| Geant4 Cross Reference |
1 // 1 //
2 // ******************************************* 2 // ********************************************************************
3 // * License and Disclaimer << 3 // * DISCLAIMER *
4 // * 4 // * *
5 // * The Geant4 software is copyright of th << 5 // * The following disclaimer summarizes all the specific disclaimers *
6 // * the Geant4 Collaboration. It is provided << 6 // * of contributors to this software. The specific disclaimers,which *
7 // * conditions of the Geant4 Software License << 7 // * govern, are listed with their locations in: *
8 // * LICENSE and available at http://cern.ch/ << 8 // * http://cern.ch/geant4/license *
9 // * include a list of copyright holders. <<
10 // * 9 // * *
11 // * Neither the authors of this software syst 10 // * Neither the authors of this software system, nor their employing *
12 // * institutes,nor the agencies providing fin 11 // * institutes,nor the agencies providing financial support for this *
13 // * work make any representation or warran 12 // * work make any representation or warranty, express or implied, *
14 // * regarding this software system or assum 13 // * regarding this software system or assume any liability for its *
15 // * use. Please see the license in the file << 14 // * use. *
16 // * for the full disclaimer and the limitatio <<
17 // * 15 // * *
18 // * This code implementation is the result << 16 // * This code implementation is the intellectual property of the *
19 // * technical work of the GEANT4 collaboratio << 17 // * GEANT4 collaboration. *
20 // * By using, copying, modifying or distri << 18 // * By copying, distributing or modifying the Program (or any work *
21 // * any work based on the software) you ag << 19 // * based on the Program) you indicate your acceptance of this *
22 // * use in resulting scientific publicati << 20 // * statement, and all its terms. *
23 // * acceptance of all terms of the Geant4 Sof <<
24 // ******************************************* 21 // ********************************************************************
25 // 22 //
26 // G4Mag_SpinEqRhs implementation <<
27 // 23 //
28 // Created: J.Apostolakis, P.Gumplinger - 08.0 << 24 //
29 // ------------------------------------------- << 25 // This is the standard right-hand side for equation of motion.
30 << 26 // This version of the right-hand side includes
>> 27 // the three components of the particle's spin.
>> 28 //
>> 29 // J. Apostolakis, February 8th, 1999
>> 30 // P. Gumplinger, February 8th, 1999
>> 31 // D. Cote-Ahern, P. Gumplinger, April 11th, 2001
>> 32 //
31 #include "G4Mag_SpinEqRhs.hh" 33 #include "G4Mag_SpinEqRhs.hh"
32 #include "G4PhysicalConstants.hh" <<
33 #include "G4SystemOfUnits.hh" <<
34 #include "G4MagneticField.hh" <<
35 #include "G4ThreeVector.hh" 34 #include "G4ThreeVector.hh"
36 << 35 #include "globals.hh"
37 G4Mag_SpinEqRhs::G4Mag_SpinEqRhs( G4MagneticFi <<
38 : G4Mag_EqRhs( MagField ) <<
39 { <<
40 } <<
41 <<
42 G4Mag_SpinEqRhs::~G4Mag_SpinEqRhs() = default; <<
43 36
44 void 37 void
45 G4Mag_SpinEqRhs::SetChargeMomentumMass(G4Charg << 38 G4Mag_SpinEqRhs::SetChargeMomentumMass(G4double particleCharge, // in e+ units
46 G4doubl 39 G4double MomentumXc,
47 G4doubl << 40 G4double mass)
48 { 41 {
49 G4Mag_EqRhs::SetChargeMomentumMass( particl << 42 // To set fCof_val
50 << 43 G4Mag_EqRhs::SetChargeMomentumMass(particleCharge, MomentumXc, mass);
51 charge = particleCharge.GetCharge(); <<
52 mass = particleMass; <<
53 magMoment = particleCharge.GetMagneticDipol <<
54 spin = particleCharge.GetSpin(); <<
55 <<
56 omegac = (eplus/mass)*c_light; <<
57 <<
58 G4double muB = 0.5*eplus*hbar_Planck/(mass/ <<
59 <<
60 G4double g_BMT; <<
61 if ( spin != 0. ) <<
62 { <<
63 g_BMT = (std::abs(magMoment)/muB)/spin; <<
64 } <<
65 else <<
66 { <<
67 g_BMT = 2.; <<
68 } <<
69 44
70 anomaly = (g_BMT - 2.)/2.; << 45 omegac = 0.105658387*GeV/mass * 2.837374841e-3*(rad/cm/kilogauss);
>> 46 anomaly = 1.165923e-3;
>> 47 ParticleCharge = particleCharge;
71 48
72 G4double E = std::sqrt(sqr(MomentumXc)+sqr( << 49 E = sqrt(sqr(MomentumXc)+sqr(mass));
73 beta = MomentumXc/E; 50 beta = MomentumXc/E;
74 gamma = E/mass; 51 gamma = E/mass;
>> 52
75 } 53 }
76 54
77 void 55 void
78 G4Mag_SpinEqRhs::EvaluateRhsGivenB( const G4do 56 G4Mag_SpinEqRhs::EvaluateRhsGivenB( const G4double y[],
79 const G4do << 57 const G4double B[3],
80 G4do << 58 G4double dydx[] ) const
81 { 59 {
82 G4double momentum_mag_square = sqr(y[3]) + 60 G4double momentum_mag_square = sqr(y[3]) + sqr(y[4]) + sqr(y[5]);
83 G4double inv_momentum_magnitude = 1.0 / std << 61 G4double inv_momentum_magnitude = 1.0 / sqrt( momentum_mag_square );
84 G4double cof = FCof()*inv_momentum_magnitud 62 G4double cof = FCof()*inv_momentum_magnitude;
85 63
86 dydx[0] = y[3] * inv_momentum_magnitude; 64 dydx[0] = y[3] * inv_momentum_magnitude; // (d/ds)x = Vx/V
87 dydx[1] = y[4] * inv_momentum_magnitude; 65 dydx[1] = y[4] * inv_momentum_magnitude; // (d/ds)y = Vy/V
88 dydx[2] = y[5] * inv_momentum_magnitude; 66 dydx[2] = y[5] * inv_momentum_magnitude; // (d/ds)z = Vz/V
89 << 67 dydx[3] = cof*(y[4]*B[2] - y[5]*B[1]) ; // Ax = a*(Vy*Bz - Vz*By)
90 if (charge == 0.) << 68 dydx[4] = cof*(y[5]*B[0] - y[3]*B[2]) ; // Ay = a*(Vz*Bx - Vx*Bz)
91 { << 69 dydx[5] = cof*(y[3]*B[1] - y[4]*B[0]) ; // Az = a*(Vx*By - Vy*Bx)
92 dydx[3] = 0.; <<
93 dydx[4] = 0.; <<
94 dydx[5] = 0.; <<
95 } <<
96 else <<
97 { <<
98 dydx[3] = cof*(y[4]*B[2] - y[5]*B[1]) ; <<
99 dydx[4] = cof*(y[5]*B[0] - y[3]*B[2]) ; <<
100 dydx[5] = cof*(y[3]*B[1] - y[4]*B[0]) ; <<
101 } <<
102 70
103 G4ThreeVector u(y[3], y[4], y[5]); 71 G4ThreeVector u(y[3], y[4], y[5]);
104 u *= inv_momentum_magnitude; 72 u *= inv_momentum_magnitude;
105 73
106 G4ThreeVector BField(B[0],B[1],B[2]); 74 G4ThreeVector BField(B[0],B[1],B[2]);
107 75
108 G4double udb = anomaly*beta*gamma/(1.+gamma 76 G4double udb = anomaly*beta*gamma/(1.+gamma) * (BField * u);
109 G4double ucb = (anomaly+1./gamma)/beta; 77 G4double ucb = (anomaly+1./gamma)/beta;
110 78
111 // Initialise the values of dydx that we do 79 // Initialise the values of dydx that we do not update.
112 dydx[6] = dydx[7] = dydx[8] = 0.0; 80 dydx[6] = dydx[7] = dydx[8] = 0.0;
113 81
114 G4ThreeVector Spin(y[9],y[10],y[11]); 82 G4ThreeVector Spin(y[9],y[10],y[11]);
>> 83 G4ThreeVector dSpin;
115 84
116 G4double pcharge; << 85 dSpin = ParticleCharge*omegac*(ucb*(Spin.cross(BField))-udb*(Spin.cross(u)));
117 if (charge == 0.) <<
118 { <<
119 pcharge = 1.; <<
120 } <<
121 else <<
122 { <<
123 pcharge = charge; <<
124 } <<
125 <<
126 G4ThreeVector dSpin(0.,0.,0.); <<
127 if (Spin.mag2() != 0.) <<
128 { <<
129 dSpin = pcharge*omegac*(ucb*(Spin.cross(B <<
130 } <<
131 86
132 dydx[9] = dSpin.x(); << 87 dydx[ 9] = dSpin.x();
133 dydx[10] = dSpin.y(); 88 dydx[10] = dSpin.y();
134 dydx[11] = dSpin.z(); 89 dydx[11] = dSpin.z();
135 90
136 return; << 91 return ;
137 } 92 }
138 93