| Geant4 Cross Reference |
1 // 1
2 // *******************************************
3 // * License and Disclaimer
4 // *
5 // * The Geant4 software is copyright of th
6 // * the Geant4 Collaboration. It is provided
7 // * conditions of the Geant4 Software License
8 // * LICENSE and available at http://cern.ch/
9 // * include a list of copyright holders.
10 // *
11 // * Neither the authors of this software syst
12 // * institutes,nor the agencies providing fin
13 // * work make any representation or warran
14 // * regarding this software system or assum
15 // * use. Please see the license in the file
16 // * for the full disclaimer and the limitatio
17 // *
18 // * This code implementation is the result
19 // * technical work of the GEANT4 collaboratio
20 // * By using, copying, modifying or distri
21 // * any work based on the software) you ag
22 // * use in resulting scientific publicati
23 // * acceptance of all terms of the Geant4 Sof
24 // *******************************************
25 //
26 // History:
27 // -----------
28 // 01 Oct 2011 A.M., S.I. - 1st implementat
29 //
30 // Class description
31 // ----------------
32 // Computation of K, L & M shell ECPSSR ionis
33 // Based on the work of A. Taborda et al.
34 // X-Ray Spectrom. 2011, 40, 127-134
35 // -------------------------------------------
36
37 #include <fstream>
38 #include <iomanip>
39
40 #include "G4ecpssrFormFactorKxsModel.hh"
41
42 #include "globals.hh"
43 #include "G4SystemOfUnits.hh"
44 #include "G4ios.hh"
45
46 #include "G4EMDataSet.hh"
47 #include "G4LogLogInterpolation.hh"
48 #include "G4Proton.hh"
49 #include "G4Alpha.hh"
50
51 //....oooOO0OOooo........oooOO0OOooo........oo
52
53 G4ecpssrFormFactorKxsModel::G4ecpssrFormFactor
54 {
55 interpolation = new G4LogLogInterpolation();
56
57 for (G4int i=3; i<93; i++)
58 {
59 protonDataSetMap[i] = new G4EMDataSet(i,
60 protonDataSetMap[i]->LoadData("pixe/ecps
61 }
62
63 for (G4int i=3; i<93; i++)
64 {
65 alphaDataSetMap[i] = new G4EMDataSet(i,i
66 alphaDataSetMap[i]->LoadData("pixe/ecpss
67 }
68 }
69
70 //....oooOO0OOooo........oooOO0OOooo........oo
71
72 G4ecpssrFormFactorKxsModel::~G4ecpssrFormFacto
73 {
74 protonDataSetMap.clear();
75 alphaDataSetMap.clear();
76 delete interpolation;
77 }
78
79 //....oooOO0OOooo........oooOO0OOooo........oo
80
81 G4double G4ecpssrFormFactorKxsModel::Calculate
82 {
83 G4Proton* aProton = G4Proton::Proton();
84 G4Alpha* aAlpha = G4Alpha::Alpha();
85 G4double sigma = 0;
86
87 if (energyIncident > 0.1*MeV && energyIncide
88
89 if (massIncident == aProton->GetPDGMass())
90 {
91 sigma = protonDataSetMap[zTarget]->FindValue
92 if (sigma !=0 && energyIncident > protonData
93 }
94 else if (massIncident == aAlpha->GetPDGMas
95 {
96 sigma = alphaDataSetMap[zTarget]->FindValue(
97 if (sigma !=0 && energyIncident > alphaDataS
98 }
99 else
100 {
101 sigma = 0.;
102 }
103 }
104
105 // sigma is in internal units: it has been c
106 // the input file in barns bt the EmDataset
107 return sigma;
108 }
109