FeynLecture/phi4.fr at master · misho104/FeynLecture · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
(* ::Package:: *)

M$ModelName = "phi to four theory";
M$Information = {
              Authors -> "Sho Iwamoto",
              Version -> "0.1",
              Date    -> "Feb. 9, 2011",
              Institutions -> "Technion",
              Emails  -> "sho@physics.technion.ac.il",
              URLs    -> "http://www.misho-web.com/"
              };


M$Parameters = {
  lam == {
         ParameterType -> External,
         BlockName     -> HOGE,
         OrderBlock    -> {1},
         Value         -> 0.1,
         Description   -> "Scalar 4-point coupling"},
(*
  kappa  == {
         ParameterType -> External,
         BlockName     -> HOGE,
         OrderBlock    -> {2},
         Value         -> 0.1,
         Description   -> "Scalar 3-point coupling"}, (* where is the vacuum? *)
*)
  mmm    == {
         ParameterType -> External,
         BlockName     -> HOGE,
         OrderBlock    -> {3},
         Value         -> 100,
         Description   -> "Scalar 2-point coupling"}
};


M$ClassesDescription = {
  S[1] == {
        ClassName -> phi,
        SelfConjugate -> True,
        Mass -> {mphi, 100},
        Width -> 0,
        PropagatorLabel -> phi,
        PropagatorType -> S,
        PropagatorArrow -> None,
        FullName -> "Scalar"}
};

Lagrangian = del[phi,mu]del[phi,mu]/2-(lam/24) phi^4 - (mmm^2/2) phi^2;