(* Content-type: application/mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 7.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[      8509,        263]
NotebookOptionsPosition[      6712,        196]
NotebookOutlinePosition[      7138,        213]
CellTagsIndexPosition[      7095,        210]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Create your own model by FeynRules", "Title",
 CellChangeTimes->{{3.536036981997404*^9, 3.536037029033853*^9}, {
  3.5362313604181757`*^9, 3.5362313697441063`*^9}}],

Cell[CellGroupData[{

Cell["FeynRules", "Section",
 CellChangeTimes->{{3.684012063023059*^9, 3.684012096157844*^9}}],

Cell[TextData[{
 StyleBox["Single",
  FontWeight->"Bold"],
 " model file (.fr) \[Rule] files for multiple HEP tools"
}], "Text",
 CellChangeTimes->{{3.6840120989751387`*^9, 3.684012201712191*^9}, 
   3.6840123972934513`*^9}],

Cell[CellGroupData[{

Cell["CalcHep / CompHep", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.684012205592032*^9, 3.684012220615147*^9}}],

Cell["FeynArts / FormCalc", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.684012205592032*^9, 3.6840122275736*^9}}],

Cell["Sherpa", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.684012205592032*^9, 3.68401222957806*^9}}],

Cell["Universal FeynRules Output (for MadGraph5_aMC@NLO)", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.684012205592032*^9, 3.684012246132505*^9}}],

Cell["Whizard / Omega", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.684012205592032*^9, 3.6840122511962*^9}}]
}, Open  ]],

Cell["\<\
Thus model files has a lot of information and should be carefully made.\
\>", "Text",
 CellChangeTimes->{{3.684012403685111*^9, 3.68401244057903*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["How to create a new \"Model\" file?", "Section",
 CellChangeTimes->{{3.536037131534835*^9, 3.5360372263613586`*^9}, {
  3.536037424335751*^9, 3.5360374299097357`*^9}, {3.5360374678636017`*^9, 
  3.536037467995038*^9}, {3.536231378367947*^9, 3.536231443279554*^9}, {
  3.684012054185601*^9, 3.68401206216199*^9}}],

Cell[TextData[StyleBox["Do not create a model by your own!",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.53623144403283*^9, 3.536231495862995*^9}}],

Cell[CellGroupData[{

Cell["A model file has", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}}],

Cell[CellGroupData[{

Cell["many gauge-syms,", "Subitem",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231602934265*^9}, {
  3.536231725317293*^9, 3.536231727094434*^9}}],

Cell["many many particles,", "Subitem",
 CellChangeTimes->{{3.536231572222719*^9, 3.536231576769208*^9}, {
  3.5362316071581497`*^9, 3.536231609678082*^9}}],

Cell["many many many interactions,", "Subitem",
 CellChangeTimes->{{3.536231572222719*^9, 3.536231576769208*^9}, {
  3.536231615293939*^9, 3.536231615886983*^9}}],

Cell["many many many many parameters,", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}}]
}, Open  ]],

Cell[TextData[{
 "which you have to input CORRECTLY........ ",
 StyleBox["Painful and Boring",
  FontWeight->"Bold"],
 "."
}], "Item",
 CellChangeTimes->{{3.536231696013741*^9, 3.5362316974694443`*^9}}]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Then what.", "Section",
 CellChangeTimes->{{3.536037131534835*^9, 3.5360372263613586`*^9}, {
  3.536037424335751*^9, 3.5360374299097357`*^9}, {3.5360374678636017`*^9, 
  3.536037467995038*^9}, {3.536231378367947*^9, 3.536231443279554*^9}, {
  3.536231715581119*^9, 3.536231716318362*^9}, {3.536231755798126*^9, 
  3.53623175924432*^9}}],

Cell[CellGroupData[{

Cell["Use models file created by professionals.", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.5362317743258877`*^9, 3.5362318104047203`*^9}}],

Cell["Modify or Extend them.", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.5362317743258877`*^9, 3.53623180398069*^9}}],

Cell[CellGroupData[{

Cell["Do not install full of the new particles.", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
  3.536231839550679*^9}}],

Cell["\<\
Install only what you really needs, or what are irrelevant to the processes.\
\>", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
  3.536231877124295*^9}}]
}, Open  ]]
}, Open  ]]
}, Open  ]],

Cell[CellGroupData[{

Cell["Let's see the (pro-made) model file for the Standard Model", "Section",
 CellChangeTimes->{{3.536231950266876*^9, 3.5362319663079367`*^9}}],

Cell[CellGroupData[{

Cell["A model file has", "Item",
 CellChangeTimes->{{3.536231501443287*^9, 3.536231561369526*^9}, {
  3.5362317743258877`*^9, 3.5362318104047203`*^9}, {3.536231977939392*^9, 
  3.536231984990707*^9}}],

Cell[CellGroupData[{

Cell["Indexes (to make the model simpler)", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
  3.536231839550679*^9}, {3.536231997875146*^9, 3.536232000836894*^9}, {
  3.536300999429112*^9, 3.5363010125012608`*^9}}],

Cell["Gauge symmetries", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
   3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
   3.536231839550679*^9}, {3.536231997875146*^9, 3.536232000836894*^9}, 
   3.536300999429112*^9}],

Cell["Particles", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
   3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
   3.536231839550679*^9}, {3.536231997875146*^9, 3.5362320033224783`*^9}, 
   3.53630098820571*^9}],

Cell["Parameters", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
  3.536231839550679*^9}, {3.5362320092275133`*^9, 3.536232012236766*^9}}],

Cell["Lagrangian", "Subitem",
 CellChangeTimes->{{3.5362315770543337`*^9, 3.536231582941592*^9}, {
  3.536231620253977*^9, 3.536231659221607*^9}, {3.536231829300992*^9, 
  3.536231839550679*^9}, {3.536232015179347*^9, 3.536232016758668*^9}}]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1440, 852},
WindowMargins->{{4, Automatic}, {Automatic, 0}},
FrontEndVersion->"10.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (October 9, \
2015)",
StyleDefinitions->FrontEnd`FileName[{"Report"}, "StandardReport.nb", 
  CharacterEncoding -> "UTF-8"]
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[567, 22, 170, 2, 289, "Title"],
Cell[CellGroupData[{
Cell[762, 28, 94, 1, 131, "Section"],
Cell[859, 31, 224, 6, 57, "Text"],
Cell[CellGroupData[{
Cell[1108, 41, 148, 2, 46, "Item"],
Cell[1259, 45, 148, 2, 46, "Item"],
Cell[1410, 49, 136, 2, 46, "Item"],
Cell[1549, 53, 181, 2, 46, "Item"],
Cell[1733, 57, 144, 2, 46, "Item"]
}, Open  ]],
Cell[1892, 62, 160, 3, 57, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2089, 70, 318, 4, 131, "Section"],
Cell[2410, 76, 156, 2, 57, "Text"],
Cell[CellGroupData[{
Cell[2591, 82, 98, 1, 46, "Item"],
Cell[CellGroupData[{
Cell[2714, 87, 150, 2, 45, "Subitem"],
Cell[2867, 91, 156, 2, 45, "Subitem"],
Cell[3026, 95, 162, 2, 45, "Subitem"],
Cell[3191, 99, 167, 2, 45, "Subitem"]
}, Open  ]],
Cell[3373, 104, 202, 6, 46, "Item"]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[3624, 116, 342, 5, 131, "Section"],
Cell[CellGroupData[{
Cell[3991, 125, 176, 2, 46, "Item"],
Cell[4170, 129, 154, 2, 46, "Item"],
Cell[CellGroupData[{
Cell[4349, 135, 226, 3, 45, "Subitem"],
Cell[4578, 140, 269, 5, 45, "Subitem"]
}, Open  ]]
}, Open  ]]
}, Open  ]],
Cell[CellGroupData[{
Cell[4908, 152, 145, 1, 200, "Section"],
Cell[CellGroupData[{
Cell[5078, 157, 200, 3, 46, "Item"],
Cell[CellGroupData[{
Cell[5303, 164, 317, 4, 45, "Subitem"],
Cell[5623, 170, 275, 4, 45, "Subitem"],
Cell[5901, 176, 269, 4, 45, "Subitem"],
Cell[6173, 182, 243, 3, 45, "Subitem"],
Cell[6419, 187, 241, 3, 45, "Subitem"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)