| Geant4 Cross Reference |
1 //
2 // ********************************************************************
3 // * License and Disclaimer *
4 // * *
5 // * The Geant4 software is copyright of the Copyright Holders of *
6 // * the Geant4 Collaboration. It is provided under the terms and *
7 // * conditions of the Geant4 Software License, included in the file *
8 // * LICENSE and available at http://cern.ch/geant4/license . These *
9 // * include a list of copyright holders. *
10 // * *
11 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file LICENSE and URL above *
16 // * for the full disclaimer and the limitation of liability. *
17 // * *
18 // * This code implementation is the result of the scientific and *
19 // * technical work of the GEANT4 collaboration. *
20 // * By using, copying, modifying or distributing the software (or *
21 // * any work based on the software) you agree to acknowledge its *
22 // * use in resulting scientific publications, and indicate your *
23 // * acceptance of all terms of the Geant4 Software license. *
24 // ********************************************************************
25 //
26 // Author: 2021 Alberto Ribon
27 //
28 //----------------------------------------------------------------------------
29
30 #include "G4HyperTriton.hh"
31
32 #include "G4DecayTable.hh"
33 #include "G4ParticleTable.hh"
34 #include "G4PhaseSpaceDecayChannel.hh"
35 #include "G4PhysicalConstants.hh"
36 #include "G4String.hh"
37 #include "G4SystemOfUnits.hh"
38 #include "G4Types.hh"
39 #include "G4VDecayChannel.hh"
40
41 G4HyperTriton* G4HyperTriton::theInstance = nullptr;
42
43 G4HyperTriton* G4HyperTriton::Definition()
44 {
45 if (theInstance != nullptr) return theInstance;
46 const G4String name = "hypertriton";
47 // search in particle table
48 G4ParticleTable* pTable = G4ParticleTable::GetParticleTable();
49 auto anInstance = static_cast<G4Ions*>(pTable->FindParticle(name));
50 if (anInstance == nullptr) {
51 // create particle
52 //
53 // Arguments for constructor are as follows
54 // name mass width charge
55 // 2*spin parity C-conjugation
56 // 2*Isospin 2*Isospin3 G-parity
57 // type lepton number baryon number PDG encoding
58 // stable lifetime decay table
59 // shortlived subType anti_encoding
60 // excitation
61
62 // clang-format off
63 anInstance = new G4Ions( name, 2991.17*MeV, 2.501e-12*MeV, +1.0*eplus,
64 1, +1, 0,
65 0, 0, 0,
66 "nucleus", 0, +3, 1010010030,
67 false, 0.2631*ns, nullptr,
68 false, "static", -1010010030,
69 0.0, 0 );
70 // clang-format on
71
72 // Magnetic Moment
73 G4double mN = eplus * hbar_Planck / 2.0 / (proton_mass_c2 / c_squared);
74 anInstance->SetPDGMagneticMoment(2.97896248 * mN);
75
76 // create Decay Table
77 auto table = new G4DecayTable;
78 // create decay channels
79 const G4double half_br_lambda_to_p_pim = 0.5 * 0.639;
80 const G4double half_br_lambda_to_n_piz = 0.5 * 0.358;
81 auto mode = new G4VDecayChannel*[4];
82 // lambda -> proton + pi- , with 50% probability of capturing the proton
83 mode[0] = new G4PhaseSpaceDecayChannel("hypertriton", half_br_lambda_to_p_pim, 3, "deuteron",
84 "proton", "pi-");
85 mode[1] = new G4PhaseSpaceDecayChannel("hypertriton", half_br_lambda_to_p_pim, 2, "He3", "pi-");
86 // lambda -> neutron + pi0 , with 50% probability of capturing the neutron
87 mode[2] = new G4PhaseSpaceDecayChannel("hypertriton", half_br_lambda_to_n_piz, 3, "deuteron",
88 "neutron", "pi0");
89 mode[3] =
90 new G4PhaseSpaceDecayChannel("hypertriton", half_br_lambda_to_n_piz, 2, "triton", "pi0");
91 for (G4int index = 0; index < 4; ++index)
92 table->Insert(mode[index]);
93 delete[] mode;
94 anInstance->SetDecayTable(table);
95 }
96 theInstance = static_cast<G4HyperTriton*>(anInstance);
97 return theInstance;
98 }
99
100 G4HyperTriton* G4HyperTriton::HyperTritonDefinition()
101 {
102 return Definition();
103 }
104
105 G4HyperTriton* G4HyperTriton::HyperTriton()
106 {
107 return Definition();
108 }
109