(*-------------------------------------*)
(* Computer tools in particle physics *)
(*-------------------------------------*)

(* With this notebook we will learn the most common commands in SARAH *)

(* We load SARAH *)

Get["SARAH-4.9.3/SARAH.m"]

(* We load the scotogenic model *)

Start["Scotogenic"]

(* Mass matrices *)

MassMatrix[Fe]

MassMatrix[Chi]

MassMatrix[Chi]/.Mn[i_,j_]:>If[i>j,Mn[j,i],Mn[i,j]]

Mass[hh]/.Masses[EWSB]

(* Tadpole equations *)

TadpoleEquations[EWSB]

TadpoleEquation[v]

solTadpole=Solve[TadpoleEquation[v],mH2]

Mass[hh]/.Masses[EWSB]/.solTadpole

(* Vertices *)

Vertex[{bar[Fe],Fe,hh}]

Vertex[{bar[Fe],Fv,conj[VWp]}]

Vertex[{Fv,Chi,hh}]

Vertex[{Fv,Chi,etR}]

(* LaTeX output *)

ModelOutput[EWSB]

MakeTeX[]

(* We create a SPheno module *)

MakeSPheno[]

(* We generate input files for micrOmegas *)

MakeCHep[]

(* We generate input UFO files for MadGraph *)

MakeUFO[]