Geant4 Cross Reference |
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 // $Id: G4DopplerProfile.cc,v 1.2 2008/03/17 13:40:53 pia Exp $ >> 28 // GEANT4 tag $Name: geant4-09-02 $ 27 // 29 // 28 // Author: Maria Grazia Pia (Maria.Grazia.Pia@ 30 // Author: Maria Grazia Pia (Maria.Grazia.Pia@cern.ch) 29 // 31 // 30 // History: 32 // History: 31 // ----------- 33 // ----------- 32 // 31 Jul 2001 MGP Created 34 // 31 Jul 2001 MGP Created 33 // 35 // 34 // ------------------------------------------- 36 // ------------------------------------------------------------------- 35 37 36 #include "G4DopplerProfile.hh" 38 #include "G4DopplerProfile.hh" 37 #include "G4DataVector.hh" 39 #include "G4DataVector.hh" 38 #include "G4SystemOfUnits.hh" 40 #include "G4SystemOfUnits.hh" 39 #include "G4VEMDataSet.hh" 41 #include "G4VEMDataSet.hh" 40 #include "G4EMDataSet.hh" 42 #include "G4EMDataSet.hh" 41 #include "G4CompositeEMDataSet.hh" 43 #include "G4CompositeEMDataSet.hh" 42 #include "G4VDataSetAlgorithm.hh" 44 #include "G4VDataSetAlgorithm.hh" 43 #include "G4LogLogInterpolation.hh" 45 #include "G4LogLogInterpolation.hh" 44 46 45 #include <fstream> 47 #include <fstream> 46 #include <sstream> 48 #include <sstream> 47 #include "Randomize.hh" 49 #include "Randomize.hh" 48 50 49 //....oooOO0OOooo........oooOO0OOooo........oo << 51 // The following deprecated header is included because <functional> seems not to be found on MGP's laptop >> 52 //#include "function.h" >> 53 >> 54 // Constructor 50 55 51 G4DopplerProfile::G4DopplerProfile(G4int minZ, 56 G4DopplerProfile::G4DopplerProfile(G4int minZ, G4int maxZ) 52 : zMin(minZ), zMax(maxZ) 57 : zMin(minZ), zMax(maxZ) 53 { 58 { >> 59 nBiggs = 31; >> 60 54 LoadBiggsP("/doppler/p-biggs"); 61 LoadBiggsP("/doppler/p-biggs"); 55 62 56 for (G4int Z=zMin; Z<zMax+1; Z++) 63 for (G4int Z=zMin; Z<zMax+1; Z++) 57 { 64 { 58 LoadProfile("/doppler/profile",Z); 65 LoadProfile("/doppler/profile",Z); 59 } 66 } 60 } 67 } 61 68 62 //....oooOO0OOooo........oooOO0OOooo........oo << 63 << 64 // Destructor 69 // Destructor 65 G4DopplerProfile::~G4DopplerProfile() 70 G4DopplerProfile::~G4DopplerProfile() 66 { 71 { 67 for (auto& pos : profileMap) << 72 std::map<G4int,G4VEMDataSet*,std::less<G4int> >::iterator pos; >> 73 for (pos = profileMap.begin(); pos != profileMap.end(); ++pos) 68 { 74 { 69 G4VEMDataSet* dataSet = pos.second; << 75 G4VEMDataSet* dataSet = (*pos).second; 70 delete dataSet; 76 delete dataSet; 71 dataSet = nullptr; << 77 dataSet = 0; 72 } 78 } 73 } 79 } 74 80 75 //....oooOO0OOooo........oooOO0OOooo........oo << 76 81 77 size_t G4DopplerProfile::NumberOfProfiles(G4in 82 size_t G4DopplerProfile::NumberOfProfiles(G4int Z) const 78 { 83 { 79 G4int n = 0; 84 G4int n = 0; 80 if (Z>= zMin && Z <= zMax) n = nShells[Z-1]; 85 if (Z>= zMin && Z <= zMax) n = nShells[Z-1]; 81 return n; 86 return n; 82 } 87 } 83 88 84 //....oooOO0OOooo........oooOO0OOooo........oo << 85 89 86 const G4VEMDataSet* G4DopplerProfile::Profiles 90 const G4VEMDataSet* G4DopplerProfile::Profiles(G4int Z) const 87 { 91 { 88 if (Z < zMin || Z > zMax) << 92 std::map<G4int,G4VEMDataSet*,std::less<G4int> >::const_iterator pos; 89 G4Exception("G4DopplerProfile::Profiles", << 93 if (Z < zMin || Z > zMax) G4Exception("G4DopplerProfile::Profiles - Z outside boundaries"); 90 "em1005",FatalException,"Z outside bou << 94 pos = profileMap.find(Z); 91 auto pos = profileMap.find(Z); << 92 G4VEMDataSet* dataSet = (*pos).second; 95 G4VEMDataSet* dataSet = (*pos).second; 93 return dataSet; 96 return dataSet; 94 } 97 } 95 98 96 //....oooOO0OOooo........oooOO0OOooo........oo << 97 99 98 const G4VEMDataSet* G4DopplerProfile::Profile( 100 const G4VEMDataSet* G4DopplerProfile::Profile(G4int Z, G4int shellIndex) const 99 { 101 { 100 const G4VEMDataSet* profis = Profiles(Z); 102 const G4VEMDataSet* profis = Profiles(Z); 101 const G4VEMDataSet* profi = profis->GetCompo 103 const G4VEMDataSet* profi = profis->GetComponent(shellIndex); 102 return profi; 104 return profi; 103 } 105 } 104 106 105 //....oooOO0OOooo........oooOO0OOooo........oo << 106 107 107 void G4DopplerProfile::PrintData() const 108 void G4DopplerProfile::PrintData() const 108 { 109 { 109 for (G4int Z=zMin; Z<zMax; Z++) 110 for (G4int Z=zMin; Z<zMax; Z++) 110 { 111 { 111 const G4VEMDataSet* profis = Profiles(Z) 112 const G4VEMDataSet* profis = Profiles(Z); 112 profis->PrintData(); 113 profis->PrintData(); 113 } 114 } 114 } 115 } 115 116 116 //....oooOO0OOooo........oooOO0OOooo........oo << 117 117 118 void G4DopplerProfile::LoadBiggsP(const G4Stri 118 void G4DopplerProfile::LoadBiggsP(const G4String& fileName) 119 { 119 { 120 std::ostringstream ost; 120 std::ostringstream ost; 121 ost << fileName << ".dat"; 121 ost << fileName << ".dat"; 122 G4String name(ost.str()); 122 G4String name(ost.str()); 123 123 124 const char* path = G4FindDataDir("G4LEDATA") << 124 char* path = getenv("G4LEDATA"); 125 if (!path) 125 if (!path) 126 { 126 { 127 G4Exception("G4DopplerProfile::LoadBiggs << 127 G4String excep("G4EMDataSet - G4LEDATA environment variable not set"); 128 "em0006",FatalException,"G4LEDATA envi << 128 G4Exception(excep); 129 return; << 130 } 129 } 131 130 132 G4String pathString(path); 131 G4String pathString(path); 133 G4String dirFile = pathString + name; 132 G4String dirFile = pathString + name; 134 std::ifstream file(dirFile); 133 std::ifstream file(dirFile); 135 std::filebuf* lsdp = file.rdbuf(); 134 std::filebuf* lsdp = file.rdbuf(); 136 135 137 if (! (lsdp->is_open()) ) 136 if (! (lsdp->is_open()) ) 138 { 137 { 139 G4String s1("data file: "); << 138 G4String s1("G4DopplerProfile::LoadBiggsP data file: "); 140 G4String s2(" not found"); 139 G4String s2(" not found"); 141 G4String excep = s1 + dirFile + s2; 140 G4String excep = s1 + dirFile + s2; 142 G4Exception("G4DopplerProfile::LoadBiggs << 141 G4Exception(excep); 143 "em0003",FatalException,excep); << 144 } 142 } 145 143 146 G4double p; 144 G4double p; 147 while(!file.eof()) 145 while(!file.eof()) 148 { 146 { 149 file >> p; 147 file >> p; 150 biggsP.push_back(p); 148 biggsP.push_back(p); 151 } 149 } 152 150 153 // Make sure that the number of data loaded 151 // Make sure that the number of data loaded corresponds to the number in Biggs' paper 154 if (biggsP.size() != nBiggs) 152 if (biggsP.size() != nBiggs) 155 G4Exception("G4DopplerProfile::LoadBiggsP" << 153 G4Exception("G4DopplerProfile::LoadBiggsP - Number of momenta read in is not 31"); 156 "em1006",FatalException,"Number of mom << 157 } 154 } 158 155 159 //....oooOO0OOooo........oooOO0OOooo........oo << 160 156 161 void G4DopplerProfile::LoadProfile(const G4Str 157 void G4DopplerProfile::LoadProfile(const G4String& fileName,G4int Z) 162 { 158 { 163 std::ostringstream ost; 159 std::ostringstream ost; 164 ost << fileName << "-" << Z << ".dat"; 160 ost << fileName << "-" << Z << ".dat"; 165 G4String name(ost.str()); 161 G4String name(ost.str()); 166 162 167 const char* path = G4FindDataDir("G4LEDATA") << 163 char* path = getenv("G4LEDATA"); 168 if (!path) 164 if (!path) 169 { 165 { 170 G4String excep("G4LEDATA environment var << 166 G4String excep("G4EMDataSet - G4LEDATA environment variable not set"); 171 G4Exception("G4DopplerProfile::LoadProfi << 167 G4Exception(excep); 172 "em0006",FatalException,excep); << 173 return; << 174 } 168 } 175 169 176 G4String pathString(path); 170 G4String pathString(path); 177 G4String dirFile = pathString + name; 171 G4String dirFile = pathString + name; 178 std::ifstream file(dirFile); 172 std::ifstream file(dirFile); 179 std::filebuf* lsdp = file.rdbuf(); 173 std::filebuf* lsdp = file.rdbuf(); 180 174 181 if (! (lsdp->is_open()) ) 175 if (! (lsdp->is_open()) ) 182 { 176 { 183 G4String s1("data file: "); << 177 G4String s1("G4DopplerProfile::LoadProfile data file: "); 184 G4String s2(" not found"); 178 G4String s2(" not found"); 185 G4String excep = s1 + dirFile + s2; 179 G4String excep = s1 + dirFile + s2; 186 G4Exception("G4DopplerProfile::LoadProfi << 180 G4Exception(excep); 187 "em0003",FatalException,excep); << 188 } 181 } 189 182 190 G4double p; 183 G4double p; 191 G4int nShell = 0; 184 G4int nShell = 0; 192 185 193 // Create CompositeDataSet for the current Z 186 // Create CompositeDataSet for the current Z 194 G4VDataSetAlgorithm* interpolation = new G4L 187 G4VDataSetAlgorithm* interpolation = new G4LogLogInterpolation; 195 G4VEMDataSet* dataSetForZ = new G4CompositeE 188 G4VEMDataSet* dataSetForZ = new G4CompositeEMDataSet(interpolation,1.,1.,1,1); 196 189 197 while (!file.eof()) 190 while (!file.eof()) 198 { 191 { 199 nShell++; 192 nShell++; 200 G4DataVector* profi = new G4DataVector; 193 G4DataVector* profi = new G4DataVector; 201 G4DataVector* biggs = new G4DataVector; 194 G4DataVector* biggs = new G4DataVector; 202 195 203 // Read in profile data for the current 196 // Read in profile data for the current shell 204 for (size_t i=0; i<nBiggs; i++) 197 for (size_t i=0; i<nBiggs; i++) 205 { 198 { 206 file >> p; 199 file >> p; 207 profi->push_back(p); 200 profi->push_back(p); 208 biggs->push_back(biggsP[i]); 201 biggs->push_back(biggsP[i]); >> 202 // if (i == 16) G4cout << "profile = " << p << G4endl; 209 } 203 } 210 204 211 // Create G4EMDataSet for the current sh 205 // Create G4EMDataSet for the current shell 212 G4VDataSetAlgorithm* algo = interpolatio 206 G4VDataSetAlgorithm* algo = interpolation->Clone(); 213 G4VEMDataSet* dataSet = new G4EMDataSet( 207 G4VEMDataSet* dataSet = new G4EMDataSet(Z, biggs, profi, algo, 1., 1., true); 214 208 215 // Add current shell profile component t 209 // Add current shell profile component to G4CompositeEMDataSet for the current Z 216 dataSetForZ->AddComponent(dataSet); 210 dataSetForZ->AddComponent(dataSet); 217 } 211 } 218 212 219 // Fill in number of shells for the current 213 // Fill in number of shells for the current Z 220 nShells.push_back(nShell); 214 nShells.push_back(nShell); 221 215 222 profileMap[Z] = dataSetForZ; 216 profileMap[Z] = dataSetForZ; 223 } 217 } 224 218 225 //....oooOO0OOooo........oooOO0OOooo........oo << 226 219 227 G4double G4DopplerProfile::RandomSelectMoment 220 G4double G4DopplerProfile::RandomSelectMomentum(G4int Z, G4int shellIndex) const 228 { 221 { 229 G4double value = 0.; 222 G4double value = 0.; 230 const G4VEMDataSet* profis = Profiles(Z); 223 const G4VEMDataSet* profis = Profiles(Z); 231 value = profis->RandomSelect(shellIndex); 224 value = profis->RandomSelect(shellIndex); 232 return value; 225 return value; 233 } 226 } 234 227