MSSMD: MSSMD.nb

File MSSMD.nb, 2.1 KB (added by WeiShi, 6 years ago)

Example notebook to produce the UFO model used in MadGraph5

Line 
1(* Content-type: application/vnd.wolfram.mathematica *)
2
3(*** Wolfram Notebook File ***)
4(* http://www.wolfram.com/nb *)
5
6(* CreatedBy='Mathematica 10.4' *)
7
8(*CacheID: 234*)
9(* Internal cache information:
10NotebookFileLineBreakTest
11NotebookFileLineBreakTest
12NotebookDataPosition[ 158, 7]
13NotebookDataLength[ 1969, 64]
14NotebookOptionsPosition[ 1718, 50]
15NotebookOutlinePosition[ 2071, 66]
16CellTagsIndexPosition[ 2028, 63]
17WindowFrame->Normal*)
18
19(* Beginning of Notebook Content *)
20Notebook[{
21Cell[BoxData[{
22 RowBox[{
23 RowBox[{"$FeynRulesPath", "=",
24 RowBox[{
25 "SetDirectory", "[",
26 "\"\</Users/ws13/Documents/DarkSUSY/MG5/feynrules-current/\>\"", "]"}]}],
27 ";"}], "\[IndentingNewLine]",
28 RowBox[{"<<", "FeynRules`"}], "\[IndentingNewLine]",
29 RowBox[{
30 RowBox[{"SetDirectory", "[",
31 RowBox[{"$FeynRulesPath", "<>", "\"\</Models/MSSMD\>\""}], "]"}],
32 ";"}], "\[IndentingNewLine]",
33 RowBox[{
34 RowBox[{"LoadModel", "[", "\"\<MSSMD.fr\>\"", "]"}],
35 ";"}], "\[IndentingNewLine]",
36 RowBox[{
37 RowBox[{"ReadLHAFile", "[",
38 RowBox[{"Input", "\[Rule]", "\"\<sps1a.dat\>\""}], "]"}],
39 ";"}], "\[IndentingNewLine]",
40 RowBox[{
41 RowBox[{"CheckHermiticity", "[",
42 RowBox[{"LADMuMu", "+", "LN1NDAD"}], "]"}], ";"}], "\[IndentingNewLine]",
43 RowBox[{
44 RowBox[{"WriteUFO", "[", "Lag", "]"}], ";"}]}], "Input",
45 CellChangeTimes->{{3.7324434905061827`*^9, 3.7324434959477243`*^9}, {
46 3.7324442065609827`*^9, 3.732444215673705*^9}, {3.732447138253428*^9,
47 3.7324471410221243`*^9}, {3.7324473054173183`*^9, 3.732447308837887*^9}, {
48 3.732448262361619*^9, 3.7324482625818768`*^9}, {3.7334377789676123`*^9,
49 3.73343777977355*^9}}]
50},
51WindowSize->{808, 655},
52WindowMargins->{{0, Automatic}, {Automatic, 0}},
53FrontEndVersion->"10.4 for Mac OS X x86 (32-bit, 64-bit Kernel) (April 11, \
542016)",
55StyleDefinitions->"Default.nb"
56]
57(* End of Notebook Content *)
58
59(* Internal cache information *)
60(*CellTagsOutline
61CellTagsIndex->{}
62*)
63(*CellTagsIndex
64CellTagsIndex->{}
65*)
66(*NotebookFileOutline
67Notebook[{
68Cell[558, 20, 1156, 28, 131, "Input"]
69}
70]
71*)
72