Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/processes/electromagnetic/lowenergy/src/G4PhotoElectricAngularGeneratorPolarized.cc

Version: [ ReleaseNotes ] [ 1.0 ] [ 1.1 ] [ 2.0 ] [ 3.0 ] [ 3.1 ] [ 3.2 ] [ 4.0 ] [ 4.0.p1 ] [ 4.0.p2 ] [ 4.1 ] [ 4.1.p1 ] [ 5.0 ] [ 5.0.p1 ] [ 5.1 ] [ 5.1.p1 ] [ 5.2 ] [ 5.2.p1 ] [ 5.2.p2 ] [ 6.0 ] [ 6.0.p1 ] [ 6.1 ] [ 6.2 ] [ 6.2.p1 ] [ 6.2.p2 ] [ 7.0 ] [ 7.0.p1 ] [ 7.1 ] [ 7.1.p1 ] [ 8.0 ] [ 8.0.p1 ] [ 8.1 ] [ 8.1.p1 ] [ 8.1.p2 ] [ 8.2 ] [ 8.2.p1 ] [ 8.3 ] [ 8.3.p1 ] [ 8.3.p2 ] [ 9.0 ] [ 9.0.p1 ] [ 9.0.p2 ] [ 9.1 ] [ 9.1.p1 ] [ 9.1.p2 ] [ 9.1.p3 ] [ 9.2 ] [ 9.2.p1 ] [ 9.2.p2 ] [ 9.2.p3 ] [ 9.2.p4 ] [ 9.3 ] [ 9.3.p1 ] [ 9.3.p2 ] [ 9.4 ] [ 9.4.p1 ] [ 9.4.p2 ] [ 9.4.p3 ] [ 9.4.p4 ] [ 9.5 ] [ 9.5.p1 ] [ 9.5.p2 ] [ 9.6 ] [ 9.6.p1 ] [ 9.6.p2 ] [ 9.6.p3 ] [ 9.6.p4 ] [ 10.0 ] [ 10.0.p1 ] [ 10.0.p2 ] [ 10.0.p3 ] [ 10.0.p4 ] [ 10.1 ] [ 10.1.p1 ] [ 10.1.p2 ] [ 10.1.p3 ] [ 10.2 ] [ 10.2.p1 ] [ 10.2.p2 ] [ 10.2.p3 ] [ 10.3 ] [ 10.3.p1 ] [ 10.3.p2 ] [ 10.3.p3 ] [ 10.4 ] [ 10.4.p1 ] [ 10.4.p2 ] [ 10.4.p3 ] [ 10.5 ] [ 10.5.p1 ] [ 10.6 ] [ 10.6.p1 ] [ 10.6.p2 ] [ 10.6.p3 ] [ 10.7 ] [ 10.7.p1 ] [ 10.7.p2 ] [ 10.7.p3 ] [ 10.7.p4 ] [ 11.0 ] [ 11.0.p1 ] [ 11.0.p2 ] [ 11.0.p3, ] [ 11.0.p4 ] [ 11.1 ] [ 11.1.1 ] [ 11.1.2 ] [ 11.1.3 ] [ 11.2 ] [ 11.2.1 ] [ 11.2.2 ] [ 11.3.0 ]

Diff markup

Differences between /processes/electromagnetic/lowenergy/src/G4PhotoElectricAngularGeneratorPolarized.cc (Version 11.3.0) and /processes/electromagnetic/lowenergy/src/G4PhotoElectricAngularGeneratorPolarized.cc (Version 10.4)


  1 //                                                  1 //
  2 // *******************************************      2 // ********************************************************************
  3 // * License and Disclaimer                         3 // * License and Disclaimer                                           *
  4 // *                                                4 // *                                                                  *
  5 // * The  Geant4 software  is  copyright of th      5 // * The  Geant4 software  is  copyright of the Copyright Holders  of *
  6 // * the Geant4 Collaboration.  It is provided      6 // * the Geant4 Collaboration.  It is provided  under  the terms  and *
  7 // * conditions of the Geant4 Software License      7 // * conditions of the Geant4 Software License,  included in the file *
  8 // * LICENSE and available at  http://cern.ch/      8 // * LICENSE and available at  http://cern.ch/geant4/license .  These *
  9 // * include a list of copyright holders.           9 // * include a list of copyright holders.                             *
 10 // *                                               10 // *                                                                  *
 11 // * Neither the authors of this software syst     11 // * Neither the authors of this software system, nor their employing *
 12 // * institutes,nor the agencies providing fin     12 // * institutes,nor the agencies providing financial support for this *
 13 // * work  make  any representation or  warran     13 // * work  make  any representation or  warranty, express or implied, *
 14 // * regarding  this  software system or assum     14 // * regarding  this  software system or assume any liability for its *
 15 // * use.  Please see the license in the file      15 // * use.  Please see the license in the file  LICENSE  and URL above *
 16 // * for the full disclaimer and the limitatio     16 // * for the full disclaimer and the limitation of liability.         *
 17 // *                                               17 // *                                                                  *
 18 // * This  code  implementation is the result      18 // * This  code  implementation is the result of  the  scientific and *
 19 // * technical work of the GEANT4 collaboratio     19 // * technical work of the GEANT4 collaboration.                      *
 20 // * By using,  copying,  modifying or  distri     20 // * By using,  copying,  modifying or  distributing the software (or *
 21 // * any work based  on the software)  you  ag     21 // * any work based  on the software)  you  agree  to acknowledge its *
 22 // * use  in  resulting  scientific  publicati     22 // * use  in  resulting  scientific  publications,  and indicate your *
 23 // * acceptance of all terms of the Geant4 Sof     23 // * acceptance of all terms of the Geant4 Software license.          *
 24 // *******************************************     24 // ********************************************************************
 25 //                                                 25 //
 26 //                                                 26 //
 27 // -------------------------------------------     27 // -------------------------------------------------------------------
 28 //                                                 28 //
 29 // GEANT4 Class file                               29 // GEANT4 Class file
 30 //                                                 30 //
 31 //                                                 31 //
 32 // File name:     G4PhotoElectricAngularGenera     32 // File name:     G4PhotoElectricAngularGeneratorPolarized
 33 //                                                 33 //
 34 // Author: A. C. Farinha, L. Peralta, P. Rodri     34 // Author: A. C. Farinha, L. Peralta, P. Rodrigues and A. Trindade
 35 //                                                 35 //
 36 // Creation date:                                  36 // Creation date:
 37 //                                                 37 //
 38 // Modifications:                                  38 // Modifications:
 39 // 10 January 2006                                 39 // 10 January 2006
 40 // 06 May 2011, Replace FILE with std::ifstrea     40 // 06 May 2011, Replace FILE with std::ifstream
 41 //                                                 41 //
 42 // Class Description:                              42 // Class Description:
 43 //                                                 43 //
 44 // Concrete class for PhotoElectric Electron A     44 // Concrete class for PhotoElectric Electron Angular Polarized Distribution Generation
 45 //                                                 45 //
 46 // Class Description:                              46 // Class Description:
 47 // PhotoElectric Electron Angular Generator ba     47 // PhotoElectric Electron Angular Generator based on the general Gavrila photoelectron angular distribution.
 48 // Includes polarization effects for K and L1      48 // Includes polarization effects for K and L1 atomic shells, according to Gavrila (1959, 1961).
 49 // For higher shells the L1 cross-section is u     49 // For higher shells the L1 cross-section is used.
 50 //                                                 50 //
 51 // The Gavrila photoelectron angular distribut     51 // The Gavrila photoelectron angular distribution is a complex function which can not be sampled using
 52 // the inverse-transform method (James 1980).      52 // the inverse-transform method (James 1980). Instead a more general approach based on the one already
 53 // used to sample bremsstrahlung 2BN cross sec     53 // used to sample bremsstrahlung 2BN cross section (G4Generator2BN, Peralta, 2005) was used.
 54 //                                                 54 //
 55 // M. Gavrila, "Relativistic K-Shell Photoeffe     55 // M. Gavrila, "Relativistic K-Shell Photoeffect", Phys. Rev. 113, 514-526   (1959)
 56 // M. Gavrila, "Relativistic L-Shell Photoeffe     56 // M. Gavrila, "Relativistic L-Shell Photoeffect", Phys. Rev. 124, 1132-1141 (1961)
 57 // F. James, Rept. on Prog. in Phys. 43, 1145      57 // F. James, Rept. on Prog. in Phys. 43, 1145 (1980)
 58 // L. Peralta et al., "A new low-energy bremss     58 // L. Peralta et al., "A new low-energy bremsstrahlung generator for GEANT4", Radiat. Prot. Dosimetry. 116, 59-64 (2005)
 59 //                                                 59 //
 60 //                                                 60 //
 61 // -------------------------------------------     61 // -------------------------------------------------------------------
 62 //                                                 62 //
 63 //                                                 63 //
 64                                                    64 
 65 #include "G4PhotoElectricAngularGeneratorPolar     65 #include "G4PhotoElectricAngularGeneratorPolarized.hh"
 66 #include "G4PhysicalConstants.hh"                  66 #include "G4PhysicalConstants.hh"
 67 #include "G4RotationMatrix.hh"                     67 #include "G4RotationMatrix.hh"
 68 #include "Randomize.hh"                            68 #include "Randomize.hh"
 69 #include "G4Exp.hh"                                69 #include "G4Exp.hh"
 70                                                    70 
 71 G4PhotoElectricAngularGeneratorPolarized::G4Ph     71 G4PhotoElectricAngularGeneratorPolarized::G4PhotoElectricAngularGeneratorPolarized()
 72   :G4VEmAngularDistribution("AngularGenSauterG     72   :G4VEmAngularDistribution("AngularGenSauterGavrilaPolarized")
 73 {                                                  73 {
 74   const G4int arrayDim = 980;                      74   const G4int arrayDim = 980;
 75                                                    75 
 76   //minimum electron beta parameter allowed        76   //minimum electron beta parameter allowed
 77   betaArray[0] = 0.02;                             77   betaArray[0] = 0.02;
 78   //beta step                                      78   //beta step
 79   betaArray[1] = 0.001;                            79   betaArray[1] = 0.001;
 80   //maximum index array for a and c tables         80   //maximum index array for a and c tables
 81   betaArray[2] = arrayDim - 1;                     81   betaArray[2] = arrayDim - 1;
 82                                                    82 
 83   // read Majorant Surface Parameters. This ar <<  83   // read Majorant Surface Parameters. This are required in order to generate Gavrila angular photoelectron distribution
 84   //Gavrila angular photoelectron distribution << 
 85   for(G4int level = 0; level < 2; level++){        84   for(G4int level = 0; level < 2; level++){
                                                   >>  85 
 86     char nameChar0[100] = "ftab0.dat"; // K-sh     86     char nameChar0[100] = "ftab0.dat"; // K-shell Majorant Surface Parameters
 87     char nameChar1[100] = "ftab1.dat"; // L-sh     87     char nameChar1[100] = "ftab1.dat"; // L-shell Majorant Surface Parameters
 88                                                    88 
 89     G4String filename;                             89     G4String filename;
 90     if(level == 0) filename = nameChar0;           90     if(level == 0) filename = nameChar0;
 91     if(level == 1) filename = nameChar1;           91     if(level == 1) filename = nameChar1;
 92                                                    92 
 93     const char* path = G4FindDataDir("G4LEDATA <<  93     char* path = getenv("G4LEDATA");
 94     if (!path)                                     94     if (!path)
 95       {                                            95       {
 96         G4String excep = "G4EMDataSet - G4LEDA     96         G4String excep = "G4EMDataSet - G4LEDATA environment variable not set";
 97         G4Exception("G4PhotoElectricAngularGen     97         G4Exception("G4PhotoElectricAngularGeneratorPolarized::G4PhotoElectricAngularGeneratorPolarized",
 98         "em0006",FatalException,"G4LEDATA envi     98         "em0006",FatalException,"G4LEDATA environment variable not set");
 99   return;                                          99   return;
100       }                                           100       }
101                                                   101 
102     G4String pathString(path);                    102     G4String pathString(path);
103     G4String dirFile = pathString + "/photoele    103     G4String dirFile = pathString + "/photoelectric_angular/" + filename;
104     std::ifstream infile(dirFile);                104     std::ifstream infile(dirFile);
105     if (!infile.is_open())                        105     if (!infile.is_open())
106       {                                           106       {
107   G4String excep = "data file: " + dirFile + "    107   G4String excep = "data file: " + dirFile + " not found";
108         G4Exception("G4PhotoElectricAngularGen    108         G4Exception("G4PhotoElectricAngularGeneratorPolarized::G4PhotoElectricAngularGeneratorPolarized",
109         "em0003",FatalException,excep);           109         "em0003",FatalException,excep);
110   return;                                         110   return;
111       }                                           111       }
112                                                   112 
113     // Read parameters into tables. The parame << 113     // Read parameters into tables. The parameters are function of incident electron energy and shell level
114     // energy and shell level                  << 
115     G4float aRead=0,cRead=0, beta=0;              114     G4float aRead=0,cRead=0, beta=0;
116     for(G4int i=0 ; i<arrayDim ;++i){          << 115     for(G4int i=0 ; i<arrayDim ;i++){
                                                   >> 116       //fscanf(infile,"%f\t %e\t %e",&beta,&aRead,&cRead);
117       infile >> beta >> aRead >> cRead;           117       infile >> beta >> aRead >> cRead;
118       aMajorantSurfaceParameterTable[i][level]    118       aMajorantSurfaceParameterTable[i][level] = aRead;
119       cMajorantSurfaceParameterTable[i][level]    119       cMajorantSurfaceParameterTable[i][level] = cRead;
120     }                                             120     }
121     infile.close();                               121     infile.close();
122   }                                               122   }
123 }                                                 123 }
124                                                   124 
125 //....oooOO0OOooo........oooOO0OOooo........oo << 
126                                                << 
127 G4PhotoElectricAngularGeneratorPolarized::~G4P    125 G4PhotoElectricAngularGeneratorPolarized::~G4PhotoElectricAngularGeneratorPolarized()
128 {}                                                126 {}
129                                                   127 
130 //....oooOO0OOooo........oooOO0OOooo........oo << 
131                                                << 
132 G4ThreeVector&                                    128 G4ThreeVector&
133 G4PhotoElectricAngularGeneratorPolarized::Samp    129 G4PhotoElectricAngularGeneratorPolarized::SampleDirection(
134                                  const G4Dynam    130                                  const G4DynamicParticle* dp,
135          G4double eKinEnergy,                     131          G4double eKinEnergy,
136          G4int shellId,                           132          G4int shellId,
137          const G4Material*)                       133          const G4Material*)
138 {                                                 134 {
139   // (shellId == 0) - K-shell  - Polarized mod    135   // (shellId == 0) - K-shell  - Polarized model for K-shell
140   // (shellId > 0)  - L1-shell - Polarized mod    136   // (shellId > 0)  - L1-shell - Polarized model for L1 and higher shells
141                                                   137 
142   // Calculate Lorentz term (gamma) and beta p    138   // Calculate Lorentz term (gamma) and beta parameters
143   G4double gamma = 1 + eKinEnergy/electron_mas    139   G4double gamma = 1 + eKinEnergy/electron_mass_c2;
144   G4double beta  = std::sqrt((gamma - 1)*(gamm    140   G4double beta  = std::sqrt((gamma - 1)*(gamma + 1))/gamma;
145                                                   141 
146   const G4ThreeVector& direction = dp->GetMome    142   const G4ThreeVector& direction = dp->GetMomentumDirection();
147   const G4ThreeVector& polarization = dp->GetP    143   const G4ThreeVector& polarization = dp->GetPolarization();
148                                                   144 
149   G4double theta, phi = 0;                        145   G4double theta, phi = 0;
150   // Majorant surface parameters                  146   // Majorant surface parameters
151   // function of the outgoing electron kinetic    147   // function of the outgoing electron kinetic energy
152   G4double aBeta = 0;                             148   G4double aBeta = 0;
153   G4double cBeta = 0;                             149   G4double cBeta = 0;
154                                                   150 
155   // For the outgoing kinetic energy              151   // For the outgoing kinetic energy
156   // find the current majorant surface paramet    152   // find the current majorant surface parameters
157   PhotoElectronGetMajorantSurfaceAandCParamete    153   PhotoElectronGetMajorantSurfaceAandCParameters(shellId, beta, &aBeta, &cBeta);
158                                                   154 
159   // Generate pho and theta according to the s    155   // Generate pho and theta according to the shell level
160   // and beta parameter of the electron           156   // and beta parameter of the electron
161   PhotoElectronGeneratePhiAndTheta(shellId, be    157   PhotoElectronGeneratePhiAndTheta(shellId, beta, aBeta, cBeta, &phi, &theta);
162                                                   158 
163   // Determine the rotation matrix                159   // Determine the rotation matrix
164   const G4RotationMatrix rotation =               160   const G4RotationMatrix rotation =
165     PhotoElectronRotationMatrix(direction, pol    161     PhotoElectronRotationMatrix(direction, polarization);
166                                                   162 
167   // Compute final direction of the outgoing e    163   // Compute final direction of the outgoing electron
168   fLocalDirection = PhotoElectronComputeFinalD    164   fLocalDirection = PhotoElectronComputeFinalDirection(rotation, theta, phi);
169                                                   165 
170   return fLocalDirection;                         166   return fLocalDirection;
171 }                                                 167 }
172                                                   168 
173 //....oooOO0OOooo........oooOO0OOooo........oo << 
174                                                << 
175 void                                              169 void
176 G4PhotoElectricAngularGeneratorPolarized::Phot    170 G4PhotoElectricAngularGeneratorPolarized::PhotoElectronGeneratePhiAndTheta(
177       G4int shellLevel, G4double beta, G4doubl    171       G4int shellLevel, G4double beta, G4double aBeta, G4double cBeta,
178       G4double *pphi, G4double *ptheta) const     172       G4double *pphi, G4double *ptheta) const
179 {                                                 173 {
180   G4double rand1, rand2, rand3 = 0;               174   G4double rand1, rand2, rand3 = 0;
181   G4double phi = 0;                               175   G4double phi = 0;
182   G4double theta = 0;                             176   G4double theta = 0;
183   G4double crossSectionValue = 0;                 177   G4double crossSectionValue = 0;
184   G4double crossSectionMajorantFunctionValue =    178   G4double crossSectionMajorantFunctionValue = 0;
185   G4double maxBeta = 0;                           179   G4double maxBeta = 0;
186                                                   180 
                                                   >> 181   //G4cout << "shell= " << shellLevel << " beta= " << beta
                                                   >> 182   //   << " aBeta= " << aBeta << " cBeta= " << cBeta << G4endl;
                                                   >> 183 
187   do {                                            184   do {
188                                                   185 
189     rand1 = G4UniformRand();                      186     rand1 = G4UniformRand();
190     rand2 = G4UniformRand();                      187     rand2 = G4UniformRand();
191     rand3 = G4UniformRand();                      188     rand3 = G4UniformRand();
192                                                   189 
193     phi=2*pi*rand1;                               190     phi=2*pi*rand1;
194                                                   191 
195     if(shellLevel == 0){                          192     if(shellLevel == 0){
                                                   >> 193 
196       // Polarized Gavrila Cross-Section for K    194       // Polarized Gavrila Cross-Section for K-shell (1959)
197       theta=std::sqrt(((G4Exp(rand2*std::log(1    195       theta=std::sqrt(((G4Exp(rand2*std::log(1+cBeta*pi*pi)))-1)/cBeta);
198       crossSectionMajorantFunctionValue =         196       crossSectionMajorantFunctionValue =
199   CrossSectionMajorantFunction(theta, cBeta);     197   CrossSectionMajorantFunction(theta, cBeta);
200       crossSectionValue = DSigmaKshellGavrila1    198       crossSectionValue = DSigmaKshellGavrila1959(beta, theta, phi);
                                                   >> 199 
201     } else {                                      200     } else {
                                                   >> 201 
202       //  Polarized Gavrila Cross-Section for     202       //  Polarized Gavrila Cross-Section for other shells (L1-shell) (1961)
203       theta = std::sqrt(((G4Exp(rand2*std::log    203       theta = std::sqrt(((G4Exp(rand2*std::log(1+cBeta*pi*pi)))-1)/cBeta);
204       crossSectionMajorantFunctionValue =         204       crossSectionMajorantFunctionValue =
205   CrossSectionMajorantFunction(theta, cBeta);     205   CrossSectionMajorantFunction(theta, cBeta);
206       crossSectionValue = DSigmaL1shellGavrila    206       crossSectionValue = DSigmaL1shellGavrila(beta, theta, phi);
                                                   >> 207 
207     }                                             208     }
208                                                   209 
209     maxBeta=rand3*aBeta*crossSectionMajorantFu    210     maxBeta=rand3*aBeta*crossSectionMajorantFunctionValue;
                                                   >> 211     //G4cout << " crossSectionValue= " << crossSectionValue
                                                   >> 212     //     << " max= " << maxBeta << G4endl;
210     if(crossSectionValue < 0.0) { crossSection    213     if(crossSectionValue < 0.0) { crossSectionValue = maxBeta; }
211                                                   214 
212   } while(maxBeta > crossSectionValue || theta    215   } while(maxBeta > crossSectionValue || theta > CLHEP::pi);
213                                                   216 
214   *pphi = phi;                                    217   *pphi = phi;
215   *ptheta = theta;                                218   *ptheta = theta;
216 }                                                 219 }
217                                                   220 
218 //....oooOO0OOooo........oooOO0OOooo........oo << 
219                                                << 
220 G4double                                          221 G4double
221 G4PhotoElectricAngularGeneratorPolarized::Cros    222 G4PhotoElectricAngularGeneratorPolarized::CrossSectionMajorantFunction(
222          G4double theta, G4double cBeta) const    223          G4double theta, G4double cBeta) const
223 {                                                 224 {
224   // Compute Majorant Function                    225   // Compute Majorant Function
225   G4double crossSectionMajorantFunctionValue =    226   G4double crossSectionMajorantFunctionValue = 0;
226   crossSectionMajorantFunctionValue = theta/(1    227   crossSectionMajorantFunctionValue = theta/(1+cBeta*theta*theta);
227   return crossSectionMajorantFunctionValue;       228   return crossSectionMajorantFunctionValue;
228 }                                                 229 }
229                                                   230 
230 //....oooOO0OOooo........oooOO0OOooo........oo << 
231                                                << 
232 G4double                                          231 G4double
233 G4PhotoElectricAngularGeneratorPolarized::DSig    232 G4PhotoElectricAngularGeneratorPolarized::DSigmaKshellGavrila1959(
234          G4double beta, G4double theta, G4doub    233          G4double beta, G4double theta, G4double phi) const
235 {                                                 234 {
236   //Double differential K shell cross-section     235   //Double differential K shell cross-section (Gavrila 1959)
237                                                   236 
238   G4double beta2 = beta*beta;                     237   G4double beta2 = beta*beta;
239   G4double oneBeta2 = 1 - beta2;                  238   G4double oneBeta2 = 1 - beta2;
240   G4double sqrtOneBeta2 = std::sqrt(oneBeta2);    239   G4double sqrtOneBeta2 = std::sqrt(oneBeta2);
241   G4double oneBeta2_to_3_2 = std::pow(oneBeta2    240   G4double oneBeta2_to_3_2 = std::pow(oneBeta2,1.5);
242   G4double cosTheta = std::cos(theta);            241   G4double cosTheta = std::cos(theta);
243   G4double sinTheta2 = std::sin(theta)*std::si    242   G4double sinTheta2 = std::sin(theta)*std::sin(theta);
244   G4double cosPhi2 = std::cos(phi)*std::cos(ph    243   G4double cosPhi2 = std::cos(phi)*std::cos(phi);
245   G4double oneBetaCosTheta = 1-beta*cosTheta;     244   G4double oneBetaCosTheta = 1-beta*cosTheta;
246   G4double dsigma = 0;                            245   G4double dsigma = 0;
247   G4double firstTerm = 0;                         246   G4double firstTerm = 0;
248   G4double secondTerm = 0;                        247   G4double secondTerm = 0;
249                                                   248 
250   firstTerm = sinTheta2*cosPhi2/std::pow(oneBe    249   firstTerm = sinTheta2*cosPhi2/std::pow(oneBetaCosTheta,4)-(1 - sqrtOneBeta2)/(2*oneBeta2) *
251               (sinTheta2 * cosPhi2)/std::pow(o    250               (sinTheta2 * cosPhi2)/std::pow(oneBetaCosTheta,3) + (1-sqrtOneBeta2)*
252               (1-sqrtOneBeta2)/(4*oneBeta2_to_    251               (1-sqrtOneBeta2)/(4*oneBeta2_to_3_2) * sinTheta2/std::pow(oneBetaCosTheta,3);
253                                                   252 
254   secondTerm = std::sqrt(1 - sqrtOneBeta2)/(st    253   secondTerm = std::sqrt(1 - sqrtOneBeta2)/(std::pow(2.,3.5)*beta2*std::pow(oneBetaCosTheta,2.5)) *
255                (4*beta2/sqrtOneBeta2 * sinThet    254                (4*beta2/sqrtOneBeta2 * sinTheta2*cosPhi2/oneBetaCosTheta + 4*beta/oneBeta2 * cosTheta * cosPhi2
256                - 4*(1-sqrtOneBeta2)/oneBeta2 *    255                - 4*(1-sqrtOneBeta2)/oneBeta2 *(1+cosPhi2) - beta2 * (1-sqrtOneBeta2)/oneBeta2 * sinTheta2/oneBetaCosTheta
257                + 4*beta2*(1-sqrtOneBeta2)/oneB    256                + 4*beta2*(1-sqrtOneBeta2)/oneBeta2_to_3_2 - 4*beta*(1-sqrtOneBeta2)*(1-sqrtOneBeta2)/oneBeta2_to_3_2 * cosTheta)
258                + (1-sqrtOneBeta2)/(4*beta2*one    257                + (1-sqrtOneBeta2)/(4*beta2*oneBetaCosTheta*oneBetaCosTheta) * (beta/oneBeta2 - 2/oneBeta2 * cosTheta * cosPhi2 +
259                (1-sqrtOneBeta2)/oneBeta2_to_3_    258                (1-sqrtOneBeta2)/oneBeta2_to_3_2 * cosTheta - beta * (1-sqrtOneBeta2)/oneBeta2_to_3_2);
260                                                   259 
261   dsigma = ( firstTerm*(1-pi*fine_structure_co << 260   dsigma = ( firstTerm*(1-pi*fine_structure_const/beta) + secondTerm*(pi*fine_structure_const) );
262                                                   261 
263   return dsigma;                                  262   return dsigma;
264 }                                                 263 }
265                                                   264 
266 //....oooOO0OOooo........oooOO0OOooo........oo << 265 //
267                                                   266 
268 G4double                                          267 G4double
269 G4PhotoElectricAngularGeneratorPolarized::DSig    268 G4PhotoElectricAngularGeneratorPolarized::DSigmaL1shellGavrila(
270         G4double beta, G4double theta, G4doubl    269         G4double beta, G4double theta, G4double phi) const
271 {                                                 270 {
272   //Double differential L1 shell cross-section    271   //Double differential L1 shell cross-section (Gavrila 1961)
273   // 26Oct2022: included factor (1/8) in dsigm << 272 
274   G4double beta2 = beta*beta;                     273   G4double beta2 = beta*beta;
275   G4double oneBeta2 = 1-beta2;                    274   G4double oneBeta2 = 1-beta2;
276   G4double sqrtOneBeta2 = std::sqrt(oneBeta2);    275   G4double sqrtOneBeta2 = std::sqrt(oneBeta2);
277   G4double oneBeta2_to_3_2=std::pow(oneBeta2,1    276   G4double oneBeta2_to_3_2=std::pow(oneBeta2,1.5);
278   G4double cosTheta = std::cos(theta);            277   G4double cosTheta = std::cos(theta);
279   G4double sinTheta2 =std::sin(theta)*std::sin    278   G4double sinTheta2 =std::sin(theta)*std::sin(theta);
280   G4double cosPhi2 = std::cos(phi)*std::cos(ph    279   G4double cosPhi2 = std::cos(phi)*std::cos(phi);
281   G4double oneBetaCosTheta = 1-beta*cosTheta;     280   G4double oneBetaCosTheta = 1-beta*cosTheta;
282                                                   281 
283   G4double dsigma = 0;                            282   G4double dsigma = 0;
284   G4double firstTerm = 0;                         283   G4double firstTerm = 0;
285   G4double secondTerm = 0;                        284   G4double secondTerm = 0;
286                                                   285 
287   firstTerm = sinTheta2*cosPhi2/std::pow(oneBe    286   firstTerm = sinTheta2*cosPhi2/std::pow(oneBetaCosTheta,4)-(1 - sqrtOneBeta2)/(2*oneBeta2)
288               *  (sinTheta2 * cosPhi2)/std::po    287               *  (sinTheta2 * cosPhi2)/std::pow(oneBetaCosTheta,3) + (1-sqrtOneBeta2)*
289               (1-sqrtOneBeta2)/(4*oneBeta2_to_    288               (1-sqrtOneBeta2)/(4*oneBeta2_to_3_2) * sinTheta2/std::pow(oneBetaCosTheta,3);
290                                                   289 
291   secondTerm = std::sqrt(1 - sqrtOneBeta2)/(st    290   secondTerm = std::sqrt(1 - sqrtOneBeta2)/(std::pow(2.,3.5)*beta2*std::pow(oneBetaCosTheta,2.5)) *
292                (4*beta2/sqrtOneBeta2 * sinThet    291                (4*beta2/sqrtOneBeta2 * sinTheta2*cosPhi2/oneBetaCosTheta + 4*beta/oneBeta2 * cosTheta * cosPhi2
293                - 4*(1-sqrtOneBeta2)/oneBeta2 *    292                - 4*(1-sqrtOneBeta2)/oneBeta2 *(1+cosPhi2) - beta2 * (1-sqrtOneBeta2)/oneBeta2 * sinTheta2/oneBetaCosTheta
294                + 4*beta2*(1-sqrtOneBeta2)/oneB    293                + 4*beta2*(1-sqrtOneBeta2)/oneBeta2_to_3_2 - 4*beta*(1-sqrtOneBeta2)*(1-sqrtOneBeta2)/oneBeta2_to_3_2 * cosTheta)
295                + (1-sqrtOneBeta2)/(4*beta2*one    294                + (1-sqrtOneBeta2)/(4*beta2*oneBetaCosTheta*oneBetaCosTheta) * (beta/oneBeta2 - 2/oneBeta2 * cosTheta * cosPhi2 +
296                (1-sqrtOneBeta2)/oneBeta2_to_3_    295                (1-sqrtOneBeta2)/oneBeta2_to_3_2*cosTheta - beta*(1-sqrtOneBeta2)/oneBeta2_to_3_2);
297                                                   296 
298   dsigma = ( firstTerm*(1-pi*fine_structure_co << 297   dsigma = ( firstTerm*(1-pi*fine_structure_const/beta) + secondTerm*(pi*fine_structure_const) );
299                                                   298 
300   return dsigma;                                  299   return dsigma;
301 }                                                 300 }
302                                                   301 
303 //....oooOO0OOooo........oooOO0OOooo........oo << 
304                                                << 
305 G4RotationMatrix                                  302 G4RotationMatrix
306 G4PhotoElectricAngularGeneratorPolarized::Phot    303 G4PhotoElectricAngularGeneratorPolarized::PhotoElectronRotationMatrix(
307            const G4ThreeVector& direction,        304            const G4ThreeVector& direction,
308      const G4ThreeVector& polarization)           305      const G4ThreeVector& polarization)
309 {                                                 306 {
310   G4double mK = direction.mag();                  307   G4double mK = direction.mag();
311   G4double mS = polarization.mag();               308   G4double mS = polarization.mag();
312   G4ThreeVector polarization2 = polarization;     309   G4ThreeVector polarization2 = polarization;
313   const G4double kTolerance = 1e-6;               310   const G4double kTolerance = 1e-6;
314                                                   311 
315   if(!(polarization.isOrthogonal(direction,kTo    312   if(!(polarization.isOrthogonal(direction,kTolerance)) || mS == 0){
316     G4ThreeVector d0 = direction.unit();          313     G4ThreeVector d0 = direction.unit();
317     G4ThreeVector a1 = PerpendicularVector(d0)    314     G4ThreeVector a1 = PerpendicularVector(d0);
318     G4ThreeVector a0 = a1.unit();                 315     G4ThreeVector a0 = a1.unit();
319     G4double rand1 = G4UniformRand();             316     G4double rand1 = G4UniformRand();
320     G4double angle = twopi*rand1;                 317     G4double angle = twopi*rand1;
321     G4ThreeVector b0 = d0.cross(a0);              318     G4ThreeVector b0 = d0.cross(a0);
322     G4ThreeVector c;                              319     G4ThreeVector c;
323     c.setX(std::cos(angle)*(a0.x())+std::sin(a    320     c.setX(std::cos(angle)*(a0.x())+std::sin(angle)*b0.x());
324     c.setY(std::cos(angle)*(a0.y())+std::sin(a    321     c.setY(std::cos(angle)*(a0.y())+std::sin(angle)*b0.y());
325     c.setZ(std::cos(angle)*(a0.z())+std::sin(a    322     c.setZ(std::cos(angle)*(a0.z())+std::sin(angle)*b0.z());
326     polarization2 = c.unit();                     323     polarization2 = c.unit();
327     mS = polarization2.mag();                     324     mS = polarization2.mag();
328   }else                                           325   }else
329     {                                             326     {
330       if ( polarization.howOrthogonal(directio    327       if ( polarization.howOrthogonal(direction) != 0)
331   {                                               328   {
332     polarization2 = polarization                  329     polarization2 = polarization
333       - polarization.dot(direction)/direction.    330       - polarization.dot(direction)/direction.dot(direction) * direction;
334   }                                               331   }
335     }                                             332     }
336                                                   333 
337   G4ThreeVector direction2 = direction/mK;        334   G4ThreeVector direction2 = direction/mK;
338   polarization2 = polarization2/mS;               335   polarization2 = polarization2/mS;
339                                                   336 
340   G4ThreeVector y = direction2.cross(polarizat    337   G4ThreeVector y = direction2.cross(polarization2);
341                                                   338 
342   G4RotationMatrix R(polarization2,y,direction    339   G4RotationMatrix R(polarization2,y,direction2);
343   return R;                                       340   return R;
344 }                                                 341 }
345                                                   342 
346 //....oooOO0OOooo........oooOO0OOooo........oo << 
347                                                << 
348 void                                              343 void
349 G4PhotoElectricAngularGeneratorPolarized::Phot    344 G4PhotoElectricAngularGeneratorPolarized::PhotoElectronGetMajorantSurfaceAandCParameters(G4int shellId, G4double beta, G4double *majorantSurfaceParameterA, G4double *majorantSurfaceParameterC) const
350 {                                                 345 {
351   // This member function finds for a given sh    346   // This member function finds for a given shell and beta value
352   // of the outgoing electron the correct Majo    347   // of the outgoing electron the correct Majorant Surface parameters
                                                   >> 348 
353   G4double aBeta,cBeta;                           349   G4double aBeta,cBeta;
354   G4double bMin,bStep;                            350   G4double bMin,bStep;
355   G4int indexMax;                                 351   G4int indexMax;
356   G4int level = 0;                                352   G4int level = 0;
357   if(shellId > 0) { level = 1; }                  353   if(shellId > 0) { level = 1; }
358                                                   354 
359   bMin = betaArray[0];                            355   bMin = betaArray[0];
360   bStep = betaArray[1];                           356   bStep = betaArray[1];
361   indexMax = (G4int)betaArray[2];                 357   indexMax = (G4int)betaArray[2];
362   const G4double kBias = 1e-9;                    358   const G4double kBias = 1e-9;
363                                                   359 
364   G4int k = (G4int)((beta-bMin+kBias)/bStep);     360   G4int k = (G4int)((beta-bMin+kBias)/bStep);
365                                                   361 
366   if(k < 0)                                       362   if(k < 0)
367     k = 0;                                        363     k = 0;
368   if(k > indexMax)                                364   if(k > indexMax)
369     k = indexMax;                                 365     k = indexMax;
370                                                   366 
371   if(k == 0)                                      367   if(k == 0)
372     aBeta = std::max(aMajorantSurfaceParameter    368     aBeta = std::max(aMajorantSurfaceParameterTable[k][level],aMajorantSurfaceParameterTable[k+1][level]);
373   else if(k==indexMax)                            369   else if(k==indexMax)
374     aBeta = std::max(aMajorantSurfaceParameter    370     aBeta = std::max(aMajorantSurfaceParameterTable[k-1][level],aMajorantSurfaceParameterTable[k][level]);
375   else{                                           371   else{
376     aBeta = std::max(aMajorantSurfaceParameter    372     aBeta = std::max(aMajorantSurfaceParameterTable[k-1][level],aMajorantSurfaceParameterTable[k][level]);
377     aBeta = std::max(aBeta,aMajorantSurfacePar    373     aBeta = std::max(aBeta,aMajorantSurfaceParameterTable[k+1][level]);
378   }                                               374   }
379                                                   375 
380   if(k == 0)                                      376   if(k == 0)
381     cBeta = std::max(cMajorantSurfaceParameter    377     cBeta = std::max(cMajorantSurfaceParameterTable[k][level],cMajorantSurfaceParameterTable[k+1][level]);
382   else if(k == indexMax)                          378   else if(k == indexMax)
383     cBeta = std::max(cMajorantSurfaceParameter    379     cBeta = std::max(cMajorantSurfaceParameterTable[k-1][level],cMajorantSurfaceParameterTable[k][level]);
384   else{                                           380   else{
385     cBeta = std::max(cMajorantSurfaceParameter    381     cBeta = std::max(cMajorantSurfaceParameterTable[k-1][level],cMajorantSurfaceParameterTable[k][level]);
386     cBeta = std::max(cBeta,cMajorantSurfacePar    382     cBeta = std::max(cBeta,cMajorantSurfaceParameterTable[k+1][level]);
387   }                                               383   }
388                                                   384 
389   *majorantSurfaceParameterA = aBeta;             385   *majorantSurfaceParameterA = aBeta;
390   *majorantSurfaceParameterC = cBeta;             386   *majorantSurfaceParameterC = cBeta;
391 }                                                 387 }
392                                                   388 
393 //....oooOO0OOooo........oooOO0OOooo........oo << 
394                                                << 
395 G4ThreeVector G4PhotoElectricAngularGeneratorP    389 G4ThreeVector G4PhotoElectricAngularGeneratorPolarized::PhotoElectronComputeFinalDirection(const G4RotationMatrix& rotation, G4double theta, G4double phi) const
396 {                                                 390 {
397   //computes the photoelectron momentum unitar    391   //computes the photoelectron momentum unitary vector
398   G4double sint = std::sin(theta);                392   G4double sint = std::sin(theta);
399   G4double px = std::cos(phi)*sint;               393   G4double px = std::cos(phi)*sint;
400   G4double py = std::sin(phi)*sint;               394   G4double py = std::sin(phi)*sint;
401   G4double pz = std::cos(theta);                  395   G4double pz = std::cos(theta);
402                                                   396 
403   G4ThreeVector samplingDirection(px,py,pz);      397   G4ThreeVector samplingDirection(px,py,pz);
404                                                   398 
405   G4ThreeVector outgoingDirection = rotation*s    399   G4ThreeVector outgoingDirection = rotation*samplingDirection;
406   return outgoingDirection;                       400   return outgoingDirection;
407 }                                                 401 }
408                                                   402 
409 //....oooOO0OOooo........oooOO0OOooo........oo << 
410                                                << 
411 void G4PhotoElectricAngularGeneratorPolarized:    403 void G4PhotoElectricAngularGeneratorPolarized::PrintGeneratorInformation() const
412 {                                                 404 {
413   G4cout << "\n" << G4endl;                       405   G4cout << "\n" << G4endl;
414   G4cout << "Polarized Photoelectric Angular G    406   G4cout << "Polarized Photoelectric Angular Generator" << G4endl;
415   G4cout << "PhotoElectric Electron Angular Ge    407   G4cout << "PhotoElectric Electron Angular Generator based on the general Gavrila photoelectron angular distribution" << G4endl;
416   G4cout << "Includes polarization effects for    408   G4cout << "Includes polarization effects for K and L1 atomic shells, according to Gavrilla (1959, 1961)." << G4endl;
417   G4cout << "For higher shells the L1 cross-se    409   G4cout << "For higher shells the L1 cross-section is used." << G4endl;
418   G4cout << "(see Physics Reference Manual) \n    410   G4cout << "(see Physics Reference Manual) \n" << G4endl;
419 }                                                 411 }
420                                                << 
421 //....oooOO0OOooo........oooOO0OOooo........oo << 
422                                                   412 
423 G4ThreeVector                                     413 G4ThreeVector
424 G4PhotoElectricAngularGeneratorPolarized::Perp    414 G4PhotoElectricAngularGeneratorPolarized::PerpendicularVector(
425          const G4ThreeVector& a) const            415          const G4ThreeVector& a) const
426 {                                                 416 {
427   G4double dx = a.x();                            417   G4double dx = a.x();
428   G4double dy = a.y();                            418   G4double dy = a.y();
429   G4double dz = a.z();                            419   G4double dz = a.z();
430   G4double x = dx < 0.0 ? -dx : dx;               420   G4double x = dx < 0.0 ? -dx : dx;
431   G4double y = dy < 0.0 ? -dy : dy;               421   G4double y = dy < 0.0 ? -dy : dy;
432   G4double z = dz < 0.0 ? -dz : dz;               422   G4double z = dz < 0.0 ? -dz : dz;
433   if (x < y) {                                    423   if (x < y) {
434     return x < z ? G4ThreeVector(-dy,dx,0) : G    424     return x < z ? G4ThreeVector(-dy,dx,0) : G4ThreeVector(0,-dz,dy);
435   }else{                                          425   }else{
436     return y < z ? G4ThreeVector(dz,0,-dx) : G    426     return y < z ? G4ThreeVector(dz,0,-dx) : G4ThreeVector(-dy,dx,0);
437   }                                               427   }
438 }                                                 428 }
439                                                   429