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 // >> 23 // >> 24 // $Id: G4ForwardXrayTR.cc,v 1.12 2004/12/02 08:31:07 vnivanch Exp $ >> 25 // GEANT4 tag $Name: geant4-07-00-patch-01 $ >> 26 // >> 27 // G4ForwardXrayTR class -- implementation file >> 28 >> 29 // GEANT 4 class implementation file --- Copyright CERN 1995 >> 30 // CERN Geneva Switzerland >> 31 >> 32 // For information related to this code, please, contact >> 33 // CERN, CN Division, ASD Group 26 // History: 34 // History: 27 // 1st version 11.09.97 V. Grichine (Vladimir. 35 // 1st version 11.09.97 V. Grichine (Vladimir.Grichine@cern.ch ) 28 // 2nd version 17.12.97 V. Grichine 36 // 2nd version 17.12.97 V. Grichine 29 // 17-09-01, migration of Materials to pure ST 37 // 17-09-01, migration of Materials to pure STL (mma) 30 // 10-03-03, migration to "cut per region" (V. 38 // 10-03-03, migration to "cut per region" (V.Ivanchenko) 31 // 03.06.03, V.Ivanchenko fix compilation warn 39 // 03.06.03, V.Ivanchenko fix compilation warnings 32 40 33 #include "G4ForwardXrayTR.hh" 41 #include "G4ForwardXrayTR.hh" 34 42 35 #include "globals.hh" 43 #include "globals.hh" 36 #include "G4Gamma.hh" << 44 #include "G4Poisson.hh" 37 #include "G4GeometryTolerance.hh" << 38 #include "G4Material.hh" 45 #include "G4Material.hh" 39 #include "G4PhysicalConstants.hh" << 40 #include "G4PhysicsLinearVector.hh" << 41 #include "G4PhysicsLogVector.hh" << 42 #include "G4PhysicsTable.hh" 46 #include "G4PhysicsTable.hh" 43 #include "G4PhysicsVector.hh" 47 #include "G4PhysicsVector.hh" 44 #include "G4Poisson.hh" << 48 #include "G4PhysicsLinearVector.hh" >> 49 #include "G4PhysicsLogVector.hh" 45 #include "G4ProductionCutsTable.hh" 50 #include "G4ProductionCutsTable.hh" 46 #include "G4SystemOfUnits.hh" << 51 47 #include "G4PhysicsModelCatalog.hh" << 52 >> 53 // Table initialization >> 54 >> 55 // G4PhysicsTable* G4ForwardXrayTR::fAngleDistrTable = NULL ; >> 56 // G4PhysicsTable* G4ForwardXrayTR::fEnergyDistrTable = NULL ; >> 57 >> 58 >> 59 // Initialization of local constants >> 60 >> 61 G4int G4ForwardXrayTR::fSympsonNumber = 100 ; >> 62 >> 63 G4double G4ForwardXrayTR::fTheMinEnergyTR = 1.0*keV ; >> 64 G4double G4ForwardXrayTR::fTheMaxEnergyTR = 100.0*keV ; >> 65 G4double G4ForwardXrayTR::fTheMaxAngle = 1.0e-3 ; >> 66 G4double G4ForwardXrayTR::fTheMinAngle = 5.0e-6 ; >> 67 G4int G4ForwardXrayTR::fBinTR = 50 ; >> 68 >> 69 G4double G4ForwardXrayTR::fMinProtonTkin = 100.0*GeV ; >> 70 G4double G4ForwardXrayTR::fMaxProtonTkin = 100.0*TeV ; >> 71 G4int G4ForwardXrayTR::fTotBin = 50 ; >> 72 // Proton energy vector initialization >> 73 >> 74 G4PhysicsLogVector* G4ForwardXrayTR:: >> 75 fProtonEnergyVector = new G4PhysicsLogVector(fMinProtonTkin, >> 76 fMaxProtonTkin, >> 77 fTotBin ) ; >> 78 >> 79 G4double G4ForwardXrayTR::fPlasmaCof = 4.0*pi*fine_structure_const* >> 80 hbarc*hbarc*hbarc/electron_mass_c2 ; >> 81 >> 82 G4double G4ForwardXrayTR::fCofTR = fine_structure_const/pi ; >> 83 >> 84 using namespace std; >> 85 >> 86 /* ************************************************************************ >> 87 >> 88 >> 89 /////////////////////////////////////////////////////////////////////// >> 90 // >> 91 // Constructor for preparation tables with angle and energy TR distributions >> 92 // in all materials involved in test program. Lorentz factors correspond to >> 93 // kinetic energies of protons between 100*GeV and 100*TeV, ~ 10^2-10^5 >> 94 // >> 95 // Recommended only for use in applications with >> 96 // few light materials involved !!!!!!!!!!!!!! >> 97 >> 98 G4ForwardXrayTR::G4ForwardXrayTR() >> 99 : G4TransitionRadiation("XrayTR") >> 100 { >> 101 G4int iMat, jMat, iTkin, iTR, iPlace ; >> 102 static >> 103 const G4MaterialTable* theMaterialTable = G4Material::GetMaterialTable(); >> 104 G4int numOfMat = G4Material::GetNumberOfMaterials(); >> 105 fGammaCutInKineticEnergy = new G4double[numOfMat] ; >> 106 fGammaCutInKineticEnergy = fPtrGamma->GetEnergyCuts() ; >> 107 fMatIndex1 = -1 ; >> 108 fMatIndex2 = -1 ; >> 109 fAngleDistrTable = new G4PhysicsTable(numOfMat*(numOfMat - 1)*fTotBin) ; >> 110 fEnergyDistrTable = new G4PhysicsTable(numOfMat*(numOfMat - 1)*fTotBin) ; >> 111 >> 112 G4PhysicsLogVector* aVector = new G4PhysicsLogVector(fMinProtonTkin, >> 113 fMaxProtonTkin, >> 114 fTotBin ) ; >> 115 >> 116 for(iMat=0;iMat<numOfMat;iMat++) // loop over pairs of different materials >> 117 { >> 118 for(jMat=0;jMat<numOfMat;jMat++) // transition iMat -> jMat !!! >> 119 { >> 120 if(iMat == jMat) continue ; // no TR !! >> 121 else >> 122 { >> 123 const G4Material* mat1 = (*theMaterialTable)[iMat] ; >> 124 const G4Material* mat2 = (*theMaterialTable)[jMat] ; >> 125 >> 126 fSigma1 = fPlasmaCof*(mat1->GetElectronDensity()) ; >> 127 fSigma2 = fPlasmaCof*(mat2->GetElectronDensity()) ; >> 128 >> 129 // fGammaTkinCut = fGammaCutInKineticEnergy[jMat] ; // TR photon in jMat ! >> 130 fGammaTkinCut = 0.0 ; >> 131 >> 132 if(fGammaTkinCut > fTheMinEnergyTR) // setting of min/max TR energies >> 133 { >> 134 fMinEnergyTR = fGammaTkinCut ; >> 135 } >> 136 else >> 137 { >> 138 fMinEnergyTR = fTheMinEnergyTR ; >> 139 } >> 140 if(fGammaTkinCut > fTheMaxEnergyTR) >> 141 { >> 142 fMaxEnergyTR = 2.0*fGammaTkinCut ; // usually very low TR rate >> 143 } >> 144 else >> 145 { >> 146 fMaxEnergyTR = fTheMaxEnergyTR ; >> 147 } >> 148 for(iTkin=0;iTkin<fTotBin;iTkin++) // Lorentz factor loop >> 149 { >> 150 G4PhysicsLogVector* >> 151 energyVector = new G4PhysicsLogVector(fMinEnergyTR, >> 152 fMaxEnergyTR, >> 153 fBinTR ) ; >> 154 G4PhysicsLinearVector* >> 155 angleVector = new G4PhysicsLinearVector( 0.0, >> 156 fMaxThetaTR, >> 157 fBinTR ) ; >> 158 G4double energySum = 0.0 ; >> 159 G4double angleSum = 0.0 ; >> 160 fGamma = 1.0 + (aVector->GetLowEdgeEnergy(iTkin)/proton_mass_c2) ; >> 161 fMaxThetaTR = 10000.0/(fGamma*fGamma) ; >> 162 if(fMaxThetaTR > fTheMaxAngle) >> 163 { >> 164 fMaxThetaTR = fTheMaxAngle ; >> 165 } >> 166 else >> 167 { >> 168 if(fMaxThetaTR < fTheMinAngle) >> 169 { >> 170 fMaxThetaTR = fTheMinAngle ; >> 171 } >> 172 } >> 173 energyVector->PutValue(fBinTR-1,energySum) ; >> 174 angleVector->PutValue(fBinTR-1,angleSum) ; >> 175 >> 176 for(iTR=fBinTR-2;iTR>=0;iTR--) >> 177 { >> 178 energySum += fCofTR*EnergySum(energyVector->GetLowEdgeEnergy(iTR), >> 179 energyVector->GetLowEdgeEnergy(iTR+1)) ; >> 180 >> 181 angleSum += fCofTR*AngleSum(angleVector->GetLowEdgeEnergy(iTR), >> 182 angleVector->GetLowEdgeEnergy(iTR+1)) ; >> 183 energyVector->PutValue(iTR,energySum) ; >> 184 angleVector->PutValue(iTR,angleSum) ; >> 185 } >> 186 if(jMat < iMat) >> 187 { >> 188 iPlace = (iMat*(numOfMat-1)+jMat)*fTotBin+iTkin ; >> 189 } >> 190 else // jMat > iMat right part of matrices (jMat-1) ! >> 191 { >> 192 iPlace = (iMat*(numOfMat-1)+jMat-1)*fTotBin+iTkin ; >> 193 } >> 194 fEnergyDistrTable->insertAt(iPlace,energyVector) ; >> 195 fAngleDistrTable->insertAt(iPlace,angleVector) ; >> 196 } // iTkin >> 197 } // jMat != iMat >> 198 } // jMat >> 199 } // iMat >> 200 } >> 201 >> 202 >> 203 **************************************************************** */ >> 204 48 205 49 ////////////////////////////////////////////// 206 ////////////////////////////////////////////////////////////////////// 50 // 207 // 51 // Constructor for creation of physics tables 208 // Constructor for creation of physics tables (angle and energy TR 52 // distributions) for a couple of selected mat 209 // distributions) for a couple of selected materials. 53 // 210 // 54 // Recommended for use in applications with ma 211 // Recommended for use in applications with many materials involved, 55 // when only few (usually couple) materials ar 212 // when only few (usually couple) materials are interested for generation 56 // of TR on the interface between them 213 // of TR on the interface between them 57 G4ForwardXrayTR::G4ForwardXrayTR(const G4Strin << 58 const G4Strin << 59 const G4Strin << 60 : G4TransitionRadiation(processName) << 61 { << 62 secID = G4PhysicsModelCatalog::GetModelID("m << 63 fPtrGamma = nullptr; << 64 fGammaCutInKineticEnergy = nullptr; << 65 fGammaTkinCut = fMinEnergyTR = fMaxEnergyTR << 66 fGamma = fSigma1 = fSigma2 = 0.0; << 67 fAngleDistrTable = nullptr; << 68 fEnergyDistrTable = nullptr; << 69 fMatIndex1 = fMatIndex2 = 0; << 70 << 71 // Proton energy vector initialization << 72 fProtonEnergyVector = << 73 new G4PhysicsLogVector(fMinProtonTkin, fMa << 74 G4int iMat; << 75 const G4ProductionCutsTable* theCoupleTable << 76 G4ProductionCutsTable::GetProductionCutsTa << 77 G4int numOfCouples = (G4int)theCoupleTable-> << 78 214 79 G4bool build = true; << 80 215 81 for(iMat = 0; iMat < numOfCouples; ++iMat) << 216 G4ForwardXrayTR:: >> 217 G4ForwardXrayTR( const G4String& matName1, // G4Material* pMat1, >> 218 const G4String& matName2, // G4Material* pMat2, >> 219 const G4String& processName ) >> 220 : G4TransitionRadiation(processName) >> 221 { >> 222 // fMatIndex1 = pMat1->GetIndex() ; >> 223 // fMatIndex2 = pMat2->GetIndex() ; >> 224 G4int iMat; >> 225 const G4ProductionCutsTable* theCoupleTable= >> 226 G4ProductionCutsTable::GetProductionCutsTable(); >> 227 G4int numOfCouples = theCoupleTable->GetTableSize(); >> 228 >> 229 for(iMat=0;iMat<numOfCouples;iMat++) // check first material name 82 { 230 { 83 const G4MaterialCutsCouple* couple = << 231 const G4MaterialCutsCouple* couple = theCoupleTable->GetMaterialCutsCouple(iMat); 84 theCoupleTable->GetMaterialCutsCouple(iM << 232 if( matName1 == couple->GetMaterial()->GetName() ) 85 if(matName1 == couple->GetMaterial()->GetN << 86 { 233 { 87 fMatIndex1 = couple->GetIndex(); << 234 fMatIndex1 = couple->GetIndex() ; 88 break; << 235 break ; 89 } 236 } 90 } 237 } 91 if(iMat == numOfCouples) 238 if(iMat == numOfCouples) 92 { 239 { 93 G4Exception("G4ForwardXrayTR::G4ForwardXra << 240 G4Exception("Invalid first material name in G4ForwardXrayTR constructor") ; 94 JustWarning, << 95 "Invalid first material name i << 96 build = false; << 97 } 241 } 98 242 99 if(build) << 243 for(iMat=0;iMat<numOfCouples;iMat++) // check second material name 100 { 244 { 101 for(iMat = 0; iMat < numOfCouples; ++iMat) << 245 const G4MaterialCutsCouple* couple = theCoupleTable->GetMaterialCutsCouple(iMat); 102 { << 246 if( matName2 == couple->GetMaterial()->GetName() ) 103 const G4MaterialCutsCouple* couple = << 104 theCoupleTable->GetMaterialCutsCouple( << 105 if(matName2 == couple->GetMaterial()->Ge << 106 { << 107 fMatIndex2 = couple->GetIndex(); << 108 break; << 109 } << 110 } << 111 if(iMat == numOfCouples) << 112 { 247 { 113 G4Exception( << 248 fMatIndex2 = couple->GetIndex() ; 114 "G4ForwardXrayTR::G4ForwardXrayTR", "F << 249 break ; 115 "Invalid second material name in G4For << 116 build = false; << 117 } 250 } 118 } 251 } 119 if(build) << 252 if(iMat == numOfCouples) 120 { 253 { 121 BuildXrayTRtables(); << 254 G4Exception("Invalid second material name in G4ForwardXrayTR constructor") ; 122 } 255 } >> 256 // G4cout<<"G4ForwardXray constructor is called"<<G4endl ; >> 257 BuildXrayTRtables() ; 123 } 258 } 124 259 125 ////////////////////////////////////////////// 260 ///////////////////////////////////////////////////////////////////////// >> 261 // 126 // Constructor used by X-ray transition radiat 262 // Constructor used by X-ray transition radiation parametrisation models 127 G4ForwardXrayTR::G4ForwardXrayTR(const G4Strin << 263 128 : G4TransitionRadiation(processName) << 264 G4ForwardXrayTR:: >> 265 G4ForwardXrayTR( const G4String& processName ) >> 266 : G4TransitionRadiation(processName) 129 { 267 { 130 fPtrGamma = nullptr; << 268 ; 131 fGammaCutInKineticEnergy = nullptr; << 132 fGammaTkinCut = fMinEnergyTR = fMaxEnergyTR << 133 fGamma = fSigma1 = fSigma2 = 0.0; << 134 fAngleDistrTable = nullptr; << 135 fEnergyDistrTable = nullptr; << 136 fMatIndex1 = fMatIndex2 = 0; << 137 << 138 // Proton energy vector initialization << 139 fProtonEnergyVector = << 140 new G4PhysicsLogVector(fMinProtonTkin, fMa << 141 } 269 } 142 270 >> 271 143 ////////////////////////////////////////////// 272 ////////////////////////////////////////////////////////////////////// >> 273 // 144 // Destructor 274 // Destructor 145 G4ForwardXrayTR::~G4ForwardXrayTR() << 275 // 146 { << 147 delete fAngleDistrTable; << 148 delete fEnergyDistrTable; << 149 delete fProtonEnergyVector; << 150 } << 151 << 152 void G4ForwardXrayTR::ProcessDescription(std:: << 153 { << 154 out << "Simulation of forward X-ray transiti << 155 "relativistic charged particles cross << 156 "two materials.\n"; << 157 } << 158 276 159 G4double G4ForwardXrayTR::GetMeanFreePath(cons << 277 G4ForwardXrayTR::~G4ForwardXrayTR() 160 G4Fo << 161 { 278 { 162 *condition = Forced; << 279 ; 163 return DBL_MAX; // so TR doesn't limit mean << 164 } 280 } 165 281 166 ////////////////////////////////////////////// 282 ////////////////////////////////////////////////////////////////////////////// >> 283 // 167 // Build physics tables for energy and angular 284 // Build physics tables for energy and angular distributions of X-ray TR photon >> 285 168 void G4ForwardXrayTR::BuildXrayTRtables() 286 void G4ForwardXrayTR::BuildXrayTRtables() 169 { 287 { 170 G4int iMat, jMat, iTkin, iTR, iPlace; << 288 G4int iMat, jMat, iTkin, iTR, iPlace ; 171 const G4ProductionCutsTable* theCoupleTable << 289 const G4ProductionCutsTable* theCoupleTable= 172 G4ProductionCutsTable::GetProductionCutsTa << 290 G4ProductionCutsTable::GetProductionCutsTable(); 173 G4int numOfCouples = (G4int)theCoupleTable-> << 291 G4int numOfCouples = theCoupleTable->GetTableSize(); 174 292 175 fGammaCutInKineticEnergy = theCoupleTable->G 293 fGammaCutInKineticEnergy = theCoupleTable->GetEnergyCutsVector(idxG4GammaCut); 176 294 177 fAngleDistrTable = new G4PhysicsTable(2 * f << 295 fAngleDistrTable = new G4PhysicsTable(2*fTotBin) ; 178 fEnergyDistrTable = new G4PhysicsTable(2 * f << 296 fEnergyDistrTable = new G4PhysicsTable(2*fTotBin) ; 179 297 180 for(iMat = 0; iMat < numOfCouples; << 298 181 ++iMat) // loop over pairs of different << 299 for(iMat=0;iMat<numOfCouples;iMat++) // loop over pairs of different materials 182 { 300 { 183 if(iMat != fMatIndex1 && iMat != fMatIndex << 301 if( iMat != fMatIndex1 && iMat != fMatIndex2 ) continue ; 184 continue; << 185 302 186 for(jMat = 0; jMat < numOfCouples; ++jMat) << 303 for(jMat=0;jMat<numOfCouples;jMat++) // transition iMat -> jMat !!! 187 { 304 { 188 if(iMat == jMat || (jMat != fMatIndex1 & << 305 if( iMat == jMat || ( jMat != fMatIndex1 && jMat != fMatIndex2 ) ) 189 { 306 { 190 continue; << 307 continue ; 191 } 308 } 192 else 309 else 193 { 310 { 194 const G4MaterialCutsCouple* iCouple = << 311 const G4MaterialCutsCouple* iCouple = theCoupleTable->GetMaterialCutsCouple(iMat); 195 theCoupleTable->GetMaterialCutsCoupl << 312 const G4MaterialCutsCouple* jCouple = theCoupleTable->GetMaterialCutsCouple(jMat); 196 const G4MaterialCutsCouple* jCouple = << 313 const G4Material* mat1 = iCouple->GetMaterial() ; 197 theCoupleTable->GetMaterialCutsCoupl << 314 const G4Material* mat2 = jCouple->GetMaterial() ; 198 const G4Material* mat1 = iCouple->GetM << 315 199 const G4Material* mat2 = jCouple->GetM << 316 fSigma1 = fPlasmaCof*(mat1->GetElectronDensity()) ; 200 << 317 fSigma2 = fPlasmaCof*(mat2->GetElectronDensity()) ; 201 fSigma1 = fPlasmaCof * (mat1->GetElect << 318 202 fSigma2 = fPlasmaCof * (mat2->GetElect << 319 // fGammaTkinCut = fGammaCutInKineticEnergy[jMat] ; // TR photon in jMat ! 203 << 320 204 fGammaTkinCut = 0.0; << 321 fGammaTkinCut = 0.0 ; 205 << 322 206 if(fGammaTkinCut > fTheMinEnergyTR) / << 323 if(fGammaTkinCut > fTheMinEnergyTR) // setting of min/max TR energies 207 { << 324 { 208 fMinEnergyTR = fGammaTkinCut; << 325 fMinEnergyTR = fGammaTkinCut ; 209 } << 326 } 210 else 327 else 211 { << 328 { 212 fMinEnergyTR = fTheMinEnergyTR; << 329 fMinEnergyTR = fTheMinEnergyTR ; 213 } << 330 } 214 if(fGammaTkinCut > fTheMaxEnergyTR) 331 if(fGammaTkinCut > fTheMaxEnergyTR) 215 { << 332 { 216 fMaxEnergyTR = 2.0 * fGammaTkinCut; << 333 fMaxEnergyTR = 2.0*fGammaTkinCut ; // usually very low TR rate 217 } << 334 } 218 else 335 else 219 { << 336 { 220 fMaxEnergyTR = fTheMaxEnergyTR; << 337 fMaxEnergyTR = fTheMaxEnergyTR ; 221 } << 338 } 222 for(iTkin = 0; iTkin < fTotBin; ++iTki << 339 for(iTkin=0;iTkin<fTotBin;iTkin++) // Lorentz factor loop 223 { << 340 { 224 auto energyVector = << 341 G4PhysicsLogVector* 225 new G4PhysicsLogVector(fMinEnergyT << 342 energyVector = new G4PhysicsLogVector( fMinEnergyTR, >> 343 fMaxEnergyTR, >> 344 fBinTR ) ; 226 345 227 fGamma = 1.0 + (fProtonEnergyVector- << 346 fGamma = 1.0 + (fProtonEnergyVector-> 228 proton_mass_c2); << 347 GetLowEdgeEnergy(iTkin)/proton_mass_c2) ; 229 348 230 fMaxThetaTR = 10000.0 / (fGamma * fG << 349 fMaxThetaTR = 10000.0/(fGamma*fGamma) ; 231 350 232 if(fMaxThetaTR > fTheMaxAngle) 351 if(fMaxThetaTR > fTheMaxAngle) 233 { 352 { 234 fMaxThetaTR = fTheMaxAngle; << 353 fMaxThetaTR = fTheMaxAngle ; 235 } << 354 } 236 else 355 else 237 { << 356 { 238 if(fMaxThetaTR < fTheMinAngle) 357 if(fMaxThetaTR < fTheMinAngle) 239 { << 358 { 240 fMaxThetaTR = fTheMinAngle; << 359 fMaxThetaTR = fTheMinAngle ; 241 } << 360 } 242 } << 361 } 243 auto angleVector = << 362 // G4cout<<G4endl<<"fGamma = "<<fGamma<<" fMaxThetaTR = "<<fMaxThetaTR<<G4endl ; 244 new G4PhysicsLinearVector(0.0, fMa << 363 G4PhysicsLinearVector* 245 G4double energySum = 0.0; << 364 angleVector = new G4PhysicsLinearVector( 0.0, 246 G4double angleSum = 0.0; << 365 fMaxThetaTR, 247 << 366 fBinTR ) ; 248 energyVector->PutValue(fBinTR - 1, e << 367 G4double energySum = 0.0 ; 249 angleVector->PutValue(fBinTR - 1, an << 368 G4double angleSum = 0.0 ; 250 << 369 251 for(iTR = fBinTR - 2; iTR >= 0; --iT << 370 energyVector->PutValue(fBinTR-1,energySum) ; 252 { << 371 angleVector->PutValue(fBinTR-1,angleSum) ; 253 energySum += << 372 254 fCofTR * EnergySum(energyVector- << 373 for(iTR=fBinTR-2;iTR>=0;iTR--) 255 energyVector- << 374 { 256 << 375 energySum += fCofTR*EnergySum(energyVector->GetLowEdgeEnergy(iTR), 257 angleSum += << 376 energyVector->GetLowEdgeEnergy(iTR+1)) ; 258 fCofTR * AngleSum(angleVector->G << 377 259 angleVector->G << 378 angleSum += fCofTR*AngleSum(angleVector->GetLowEdgeEnergy(iTR), 260 << 379 angleVector->GetLowEdgeEnergy(iTR+1)) ; 261 energyVector->PutValue(iTR, energy << 380 262 angleVector->PutValue(iTR, angleSu << 381 energyVector->PutValue(iTR,energySum) ; 263 } << 382 angleVector ->PutValue(iTR,angleSum) ; >> 383 } >> 384 // G4cout<<"sumE = "<<energySum<<" ; sumA = "<<angleSum<<G4endl ; 264 385 265 if(jMat < iMat) 386 if(jMat < iMat) 266 { << 387 { 267 iPlace = fTotBin + iTkin; << 388 iPlace = fTotBin+iTkin ; // (iMat*(numOfMat-1)+jMat)* 268 } << 389 } 269 else // jMat > iMat right part of m << 390 else // jMat > iMat right part of matrices (jMat-1) ! 270 { << 391 { 271 iPlace = iTkin; << 392 iPlace = iTkin ; // (iMat*(numOfMat-1)+jMat-1)*fTotBin+ 272 } << 393 } 273 fEnergyDistrTable->insertAt(iPlace, << 394 fEnergyDistrTable->insertAt(iPlace,energyVector) ; 274 fAngleDistrTable->insertAt(iPlace, a << 395 fAngleDistrTable->insertAt(iPlace,angleVector) ; 275 } // iTkin << 396 } // iTkin 276 } // jMat != iMat << 397 } // jMat != iMat 277 } // jMat << 398 } // jMat 278 } // iMat << 399 } // iMat >> 400 // G4cout<<"G4ForwardXrayTR::BuildXrayTRtables have been called"<<G4endl ; 279 } 401 } 280 402 281 ////////////////////////////////////////////// 403 /////////////////////////////////////////////////////////////////////// 282 // 404 // 283 // This function returns the spectral and angl 405 // This function returns the spectral and angle density of TR quanta 284 // in X-ray energy region generated forward wh 406 // in X-ray energy region generated forward when a relativistic 285 // charged particle crosses interface between 407 // charged particle crosses interface between two materials. 286 // The high energy small theta approximation i 408 // The high energy small theta approximation is applied. 287 // (matter1 -> matter2) 409 // (matter1 -> matter2) 288 // varAngle =2* (1 - std::cos(Theta)) or appro << 410 // varAngle =2* (1 - cos(Theta)) or approximately = Theta*Theta 289 // 411 // 290 G4double G4ForwardXrayTR::SpectralAngleTRdensi << 412 291 << 413 G4double 292 { << 414 G4ForwardXrayTR::SpectralAngleTRdensity( G4double energy, 293 G4double formationLength1, formationLength2; << 415 G4double varAngle ) const 294 formationLength1 = << 416 { 295 1.0 / (1.0 / (fGamma * fGamma) + fSigma1 / << 417 G4double formationLength1, formationLength2 ; 296 formationLength2 = << 418 formationLength1 = 1.0/ 297 1.0 / (1.0 / (fGamma * fGamma) + fSigma2 / << 419 (1.0/(fGamma*fGamma) 298 return (varAngle / energy) * (formationLengt << 420 + fSigma1/(energy*energy) 299 (formationLength1 - formationLength2) << 421 + varAngle) ; >> 422 formationLength2 = 1.0/ >> 423 (1.0/(fGamma*fGamma) >> 424 + fSigma2/(energy*energy) >> 425 + varAngle) ; >> 426 return (varAngle/energy)*(formationLength1 - formationLength2) >> 427 *(formationLength1 - formationLength2) ; >> 428 300 } 429 } 301 430 >> 431 302 ////////////////////////////////////////////// 432 ////////////////////////////////////////////////////////////////// >> 433 // 303 // Analytical formula for angular density of X 434 // Analytical formula for angular density of X-ray TR photons 304 G4double G4ForwardXrayTR::AngleDensity(G4doubl << 435 // >> 436 >> 437 G4double G4ForwardXrayTR::AngleDensity( G4double energy, >> 438 G4double varAngle ) const 305 { 439 { 306 G4double x, x2, c, d, f, a2, b2, a4, b4; << 440 G4double x, x2, a, b, c, d, f, a2, b2, a4, b4 ; 307 G4double cof1, cof2, cof3; << 441 G4double cof1, cof2, cof3 ; 308 x = 1.0 / energy; << 442 x = 1.0/energy ; 309 x2 = x * x; << 443 x2 = x*x ; 310 c = 1.0 / fSigma1; << 444 c = 1.0/fSigma1 ; 311 d = 1.0 / fSigma2; << 445 d = 1.0/fSigma2 ; 312 f = (varAngle + 1.0 / (fGamma * fGamma)); << 446 f = (varAngle + 1.0/(fGamma*fGamma)) ; 313 a2 = c * f; << 447 a2 = c*f ; 314 b2 = d * f; << 448 b2 = d*f ; 315 a4 = a2 * a2; << 449 a4 = a2*a2 ; 316 b4 = b2 * b2; << 450 b4 = b2*b2 ; 317 cof1 = c * c * (0.5 / (a2 * (x2 + a2)) + 0.5 << 451 a = sqrt(a2) ; 318 cof3 = d * d * (0.5 / (b2 * (x2 + b2)) + 0.5 << 452 b = sqrt(b2) ; 319 cof2 = -c * d * << 453 cof1 = c*c*(0.5/(a2*(x2 +a2)) +0.5*log(x2/(x2 +a2))/a4) ; 320 (std::log(x2 / (x2 + b2)) / b2 - std: << 454 cof3 = d*d*(0.5/(b2*(x2 +b2)) +0.5*log(x2/(x2 +b2))/b4) ; 321 (a2 - b2); << 455 cof2 = -c*d*(log(x2/(x2 +b2))/b2 - log(x2/(x2 +a2))/a2)/(a2 - b2) ; 322 return -varAngle * (cof1 + cof2 + cof3); << 456 return -varAngle*(cof1 + cof2 + cof3) ; 323 } 457 } 324 458 325 ////////////////////////////////////////////// 459 ///////////////////////////////////////////////////////////////////// >> 460 // 326 // Definite integral of X-ray TR spectral-angl 461 // Definite integral of X-ray TR spectral-angle density from energy1 327 // to energy2 462 // to energy2 328 G4double G4ForwardXrayTR::EnergyInterval(G4dou << 463 // 329 G4dou << 464 >> 465 G4double G4ForwardXrayTR::EnergyInterval( G4double energy1, >> 466 G4double energy2, >> 467 G4double varAngle ) const 330 { 468 { 331 return AngleDensity(energy2, varAngle) - Ang << 469 return AngleDensity(energy2,varAngle) >> 470 - AngleDensity(energy1,varAngle) ; 332 } 471 } 333 472 334 ////////////////////////////////////////////// 473 ////////////////////////////////////////////////////////////////////// >> 474 // 335 // Integral angle distribution of X-ray TR pho 475 // Integral angle distribution of X-ray TR photons based on analytical 336 // formula for angle density 476 // formula for angle density 337 G4double G4ForwardXrayTR::AngleSum(G4double va << 477 // >> 478 >> 479 G4double G4ForwardXrayTR::AngleSum( G4double varAngle1, >> 480 G4double varAngle2 ) const 338 { 481 { 339 G4int i; << 482 G4int i ; 340 G4double h, sumEven = 0.0, sumOdd = 0.0; << 483 G4double h , sumEven = 0.0 , sumOdd = 0.0 ; 341 h = 0.5 * (varAngle2 - varAngle1) / fSympson << 484 h = 0.5*(varAngle2 - varAngle1)/fSympsonNumber ; 342 for(i = 1; i < fSympsonNumber; ++i) << 485 for(i=1;i<fSympsonNumber;i++) 343 { << 486 { 344 sumEven += << 487 sumEven += EnergyInterval(fMinEnergyTR,fMaxEnergyTR,varAngle1 + 2*i*h ) ; 345 EnergyInterval(fMinEnergyTR, fMaxEnergyT << 488 sumOdd += EnergyInterval(fMinEnergyTR,fMaxEnergyTR, 346 sumOdd += << 489 varAngle1 + (2*i - 1)*h ) ; 347 EnergyInterval(fMinEnergyTR, fMaxEnergyT << 490 } 348 } << 491 sumOdd += EnergyInterval(fMinEnergyTR,fMaxEnergyTR, 349 sumOdd += EnergyInterval(fMinEnergyTR, fMaxE << 492 varAngle1 + (2*fSympsonNumber - 1)*h ) ; 350 varAngle1 + (2 * fS << 493 351 << 494 return h*(EnergyInterval(fMinEnergyTR,fMaxEnergyTR,varAngle1) 352 return h * << 495 + EnergyInterval(fMinEnergyTR,fMaxEnergyTR,varAngle2) 353 (EnergyInterval(fMinEnergyTR, fMaxEne << 496 + 4.0*sumOdd + 2.0*sumEven )/3.0 ; 354 EnergyInterval(fMinEnergyTR, fMaxEne << 355 2.0 * sumEven) / << 356 3.0; << 357 } 497 } 358 498 359 ////////////////////////////////////////////// 499 ///////////////////////////////////////////////////////////////////// >> 500 // 360 // Analytical Expression for spectral densit 501 // Analytical Expression for spectral density of Xray TR photons 361 // x = 2*(1 - std::cos(Theta)) ~ Theta^2 << 502 // x = 2*(1 - cos(Theta)) ~ Theta^2 362 G4double G4ForwardXrayTR::SpectralDensity(G4do << 503 // >> 504 >> 505 G4double G4ForwardXrayTR::SpectralDensity( G4double energy, >> 506 G4double x ) const 363 { 507 { 364 G4double a, b; << 508 G4double a, b ; 365 a = 1.0 / (fGamma * fGamma) + fSigma1 / (ene << 509 a = 1.0/(fGamma*fGamma) 366 b = 1.0 / (fGamma * fGamma) + fSigma2 / (ene << 510 + fSigma1/(energy*energy) ; 367 return ((a + b) * std::log((x + b) / (x + a) << 511 b = 1.0/(fGamma*fGamma) 368 b / (x + b)) / << 512 + fSigma2/(energy*energy) ; 369 energy; << 513 return ( (a + b)*log((x + b)/(x + a))/(a - b) >> 514 + a/(x + a) + b/(x + b) )/energy ; >> 515 370 } 516 } 371 517 372 ////////////////////////////////////////////// 518 //////////////////////////////////////////////////////////////////// >> 519 // 373 // The spectral density in some angle interva 520 // The spectral density in some angle interval from varAngle1 to 374 // varAngle2 521 // varAngle2 375 G4double G4ForwardXrayTR::AngleInterval(G4doub << 522 // 376 G4doub << 523 >> 524 G4double G4ForwardXrayTR::AngleInterval( G4double energy, >> 525 G4double varAngle1, >> 526 G4double varAngle2 ) const 377 { 527 { 378 return SpectralDensity(energy, varAngle2) - << 528 return SpectralDensity(energy,varAngle2) 379 SpectralDensity(energy, varAngle1); << 529 - SpectralDensity(energy,varAngle1) ; 380 } 530 } 381 531 382 ////////////////////////////////////////////// 532 //////////////////////////////////////////////////////////////////// >> 533 // 383 // Integral spectral distribution of X-ray TR 534 // Integral spectral distribution of X-ray TR photons based on 384 // analytical formula for spectral density 535 // analytical formula for spectral density 385 G4double G4ForwardXrayTR::EnergySum(G4double e << 536 // >> 537 >> 538 G4double G4ForwardXrayTR::EnergySum( G4double energy1, >> 539 G4double energy2 ) const 386 { 540 { 387 G4int i; << 541 G4int i ; 388 G4double h, sumEven = 0.0, sumOdd = 0.0; << 542 G4double h , sumEven = 0.0 , sumOdd = 0.0 ; 389 h = 0.5 * (energy2 - energy1) / fSympsonNumb << 543 h = 0.5*(energy2 - energy1)/fSympsonNumber ; 390 for(i = 1; i < fSympsonNumber; ++i) << 544 for(i=1;i<fSympsonNumber;i++) 391 { << 545 { 392 sumEven += AngleInterval(energy1 + 2 * i * << 546 sumEven += AngleInterval(energy1 + 2*i*h,0.0,fMaxThetaTR); 393 sumOdd += AngleInterval(energy1 + (2 * i - << 547 sumOdd += AngleInterval(energy1 + (2*i - 1)*h,0.0,fMaxThetaTR) ; 394 } << 548 } 395 sumOdd += << 549 sumOdd += AngleInterval(energy1 + (2*fSympsonNumber - 1)*h, 396 AngleInterval(energy1 + (2 * fSympsonNumbe << 550 0.0,fMaxThetaTR) ; 397 << 551 398 return h * << 552 return h*( AngleInterval(energy1,0.0,fMaxThetaTR) 399 (AngleInterval(energy1, 0.0, fMaxThet << 553 + AngleInterval(energy2,0.0,fMaxThetaTR) 400 AngleInterval(energy2, 0.0, fMaxThet << 554 + 4.0*sumOdd + 2.0*sumEven )/3.0 ; 401 2.0 * sumEven) / << 402 3.0; << 403 } 555 } 404 556 405 ////////////////////////////////////////////// 557 ///////////////////////////////////////////////////////////////////////// >> 558 // 406 // PostStepDoIt function for creation of forwa 559 // PostStepDoIt function for creation of forward X-ray photons in TR process 407 // on boundary between two materials with real << 560 // on boubndary between two materials with really different plasma energies >> 561 // >> 562 408 G4VParticleChange* G4ForwardXrayTR::PostStepDo 563 G4VParticleChange* G4ForwardXrayTR::PostStepDoIt(const G4Track& aTrack, 409 << 564 const G4Step& aStep) 410 { 565 { 411 aParticleChange.Initialize(aTrack); 566 aParticleChange.Initialize(aTrack); 412 G4int iMat, jMat, iTkin, iPlace, numOfTR, iT << 567 // G4cout<<"call G4ForwardXrayTR::PostStepDoIt"<<G4endl ; >> 568 G4int iMat, jMat, iTkin, iPlace, numOfTR, iTR, iTransfer ; 413 569 414 G4double energyPos, anglePos, energyTR, thet << 570 G4double energyPos, anglePos, energyTR, theta, phi, dirX, dirY, dirZ ; 415 G4double W, W1, W2, E1, E2; << 571 G4double W, W1, W2, E1, E2 ; 416 572 417 G4StepPoint* pPreStepPoint = aStep.GetPreSt 573 G4StepPoint* pPreStepPoint = aStep.GetPreStepPoint(); 418 G4StepPoint* pPostStepPoint = aStep.GetPostS 574 G4StepPoint* pPostStepPoint = aStep.GetPostStepPoint(); 419 G4double tol = << 420 0.5 * G4GeometryTolerance::GetInstance()-> << 421 575 422 if(pPostStepPoint->GetStepStatus() != fGeomB << 576 if (pPostStepPoint->GetStepStatus() != fGeomBoundary) 423 { 577 { 424 return G4VDiscreteProcess::PostStepDoIt(aT 578 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 425 } 579 } 426 if(aTrack.GetStepLength() <= tol) << 580 if (aTrack.GetStepLength() <= kCarTolerance*0.5) >> 581 427 { 582 { 428 return G4VDiscreteProcess::PostStepDoIt(aT 583 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 429 } 584 } 430 // Arrived at boundary, so begin to try TR << 585 // Come on boundary, so begin to try TR 431 586 432 const G4MaterialCutsCouple* iCouple = pPreSt << 587 const G4MaterialCutsCouple* iCouple = pPreStepPoint ->GetPhysicalVolume()-> 433 ->Ge << 588 GetLogicalVolume()->GetMaterialCutsCouple(); 434 ->Ge << 589 const G4MaterialCutsCouple* jCouple = pPostStepPoint ->GetPhysicalVolume()-> 435 const G4MaterialCutsCouple* jCouple = pPostS << 590 GetLogicalVolume()->GetMaterialCutsCouple(); 436 ->Ge << 437 ->Ge << 438 const G4Material* iMaterial = iCouple->GetMa 591 const G4Material* iMaterial = iCouple->GetMaterial(); 439 const G4Material* jMaterial = jCouple->GetMa 592 const G4Material* jMaterial = jCouple->GetMaterial(); 440 iMat = iCouple->GetIn << 593 iMat = iCouple->GetIndex(); 441 jMat = jCouple->GetIn << 594 jMat = jCouple->GetIndex(); 442 595 443 // The case of equal or approximate (in term 596 // The case of equal or approximate (in terms of plasma energy) materials 444 // No TR photons ?! 597 // No TR photons ?! 445 598 446 if(iMat == jMat || << 599 if ( iMat == jMat 447 ((fMatIndex1 >= 0 && fMatIndex2 >= 0) && << 600 || ( (fMatIndex1 >= 0 && fMatIndex1 >= 0) 448 (iMat != fMatIndex1 && iMat != fMatIndex << 601 && ( iMat != fMatIndex1 && iMat != fMatIndex2 ) 449 (jMat != fMatIndex1 && jMat != fMatIndex << 602 && ( jMat != fMatIndex1 && jMat != fMatIndex2 ) ) 450 603 451 || iMaterial->GetState() == jMaterial->Ge << 604 || iMaterial->GetState() == jMaterial->GetState() 452 605 453 || (iMaterial->GetState() == kStateSolid << 606 ||(iMaterial->GetState() == kStateSolid && jMaterial->GetState() == kStateLiquid ) 454 jMaterial->GetState() == kStateLiquid << 455 607 456 || (iMaterial->GetState() == kStateLiquid << 608 ||(iMaterial->GetState() == kStateLiquid && jMaterial->GetState() == kStateSolid ) ) 457 jMaterial->GetState() == kStateSolid) << 458 { 609 { 459 return G4VDiscreteProcess::PostStepDoIt(aT << 610 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep) ; 460 } 611 } 461 612 462 const G4DynamicParticle* aParticle = aTrack. 613 const G4DynamicParticle* aParticle = aTrack.GetDynamicParticle(); 463 G4double charge = aParticle->GetDefinition() 614 G4double charge = aParticle->GetDefinition()->GetPDGCharge(); 464 615 465 if(charge == 0.0) // Uncharged particle doe << 616 if(charge == 0.0) // Uncharged particle doesn't Generate TR photons 466 { 617 { 467 return G4VDiscreteProcess::PostStepDoIt(aT 618 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 468 } 619 } 469 // Now we are ready to Generate TR photons 620 // Now we are ready to Generate TR photons 470 621 471 G4double chargeSq = charge * charge; << 622 G4double chargeSq = charge*charge ; 472 G4double kinEnergy = aParticle->GetKineticEn << 623 G4double kinEnergy = aParticle->GetKineticEnergy() ; 473 G4double massRatio = << 624 G4double massRatio = proton_mass_c2/aParticle->GetDefinition()->GetPDGMass() ; 474 proton_mass_c2 / aParticle->GetDefinition( << 625 G4double TkinScaled = kinEnergy*massRatio ; 475 G4double TkinScaled = kinEnergy * massRatio; << 626 for(iTkin=0;iTkin<fTotBin;iTkin++) 476 for(iTkin = 0; iTkin < fTotBin; ++iTkin) << 477 { 627 { 478 if(TkinScaled < fProtonEnergyVector->GetLo << 628 if(TkinScaled < fProtonEnergyVector->GetLowEdgeEnergy(iTkin)) // <= ? 479 { 629 { 480 break; << 630 break ; 481 } 631 } 482 } 632 } 483 if(jMat < iMat) 633 if(jMat < iMat) 484 { 634 { 485 iPlace = fTotBin + iTkin - 1; << 635 iPlace = fTotBin + iTkin - 1 ; // (iMat*(numOfMat - 1) + jMat)* 486 } 636 } 487 else 637 else 488 { 638 { 489 iPlace = iTkin - 1; << 639 iPlace = iTkin - 1 ; // (iMat*(numOfMat - 1) + jMat - 1)*fTotBin + 490 } 640 } >> 641 // G4PhysicsVector* energyVector1 = (*fEnergyDistrTable)(iPlace) ; >> 642 // G4PhysicsVector* energyVector2 = (*fEnergyDistrTable)(iPlace + 1) ; >> 643 >> 644 // G4PhysicsVector* angleVector1 = (*fAngleDistrTable)(iPlace) ; >> 645 // G4PhysicsVector* angleVector2 = (*fAngleDistrTable)(iPlace + 1) ; 491 646 492 G4ParticleMomentum particleDir = aParticle-> << 647 G4ParticleMomentum particleDir = aParticle->GetMomentumDirection() ; 493 648 494 if(iTkin == fTotBin) // TR plato, try from << 649 if(iTkin == fTotBin) // TR plato, try from left 495 { 650 { 496 numOfTR = (G4int)G4Poisson( << 651 // G4cout<<iTkin<<" mean TR number = "<<( (*(*fEnergyDistrTable)(iPlace))(0) + 497 ((*(*fEnergyDistrTable)(iPlace))(0) + (* << 652 // (*(*fAngleDistrTable)(iPlace))(0) ) 498 chargeSq * 0.5); << 653 // *chargeSq*0.5<<G4endl ; >> 654 >> 655 numOfTR = G4Poisson( ( (*(*fEnergyDistrTable)(iPlace))(0) + >> 656 (*(*fAngleDistrTable)(iPlace))(0) ) >> 657 *chargeSq*0.5 ) ; 499 if(numOfTR == 0) 658 if(numOfTR == 0) 500 { 659 { 501 return G4VDiscreteProcess::PostStepDoIt( 660 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 502 } 661 } 503 else 662 else 504 { 663 { >> 664 // G4cout<<"Number of X-ray TR photons = "<<numOfTR<<G4endl ; >> 665 505 aParticleChange.SetNumberOfSecondaries(n 666 aParticleChange.SetNumberOfSecondaries(numOfTR); 506 667 507 for(iTR = 0; iTR < numOfTR; ++iTR) << 668 for(iTR=0;iTR<numOfTR;iTR++) 508 { 669 { 509 energyPos = (*(*fEnergyDistrTable)(iPl << 670 energyPos = (*(*fEnergyDistrTable)(iPlace))(0)*G4UniformRand() ; 510 for(iTransfer = 0; iTransfer < fBinTR << 671 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 511 { << 672 { 512 if(energyPos >= (*(*fEnergyDistrTabl << 673 if(energyPos >= (*(*fEnergyDistrTable)(iPlace))(iTransfer)) break ; 513 break; << 674 } 514 } << 675 energyTR = (*fEnergyDistrTable)(iPlace)->GetLowEdgeEnergy(iTransfer) ; 515 energyTR = (*fEnergyDistrTable)(iPlace << 516 676 517 kinEnergy -= energyTR; << 677 // G4cout<<"energyTR = "<<energyTR/keV<<"keV"<<G4endl ; 518 aParticleChange.ProposeEnergy(kinEnerg << 519 678 520 anglePos = (*(*fAngleDistrTable)(iPlac << 679 kinEnergy -= energyTR ; 521 for(iTransfer = 0; iTransfer < fBinTR << 680 aParticleChange.ProposeEnergy(kinEnergy); 522 { << 523 if(anglePos > (*(*fAngleDistrTable)( << 524 break; << 525 } << 526 theta = std::sqrt( << 527 (*fAngleDistrTable)(iPlace)->GetLowE << 528 681 529 phi = twopi * G4UniformRand(); << 682 anglePos = (*(*fAngleDistrTable)(iPlace))(0)*G4UniformRand() ; 530 dirX = std::sin(theta) * std::cos(phi) << 683 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 531 dirY = std::sin(theta) * std::sin(phi) << 684 { 532 dirZ = std::cos(theta); << 685 if(anglePos > (*(*fAngleDistrTable)(iPlace))(iTransfer)) break ; 533 G4ThreeVector directionTR(dirX, dirY, << 686 } 534 directionTR.rotateUz(particleDir); << 687 theta = sqrt((*fAngleDistrTable)(iPlace)->GetLowEdgeEnergy(iTransfer-1)) ; 535 auto aPhotonTR = new G4DynamicParticle << 688 536 << 689 // G4cout<<iTransfer<<" : theta = "<<theta<<G4endl ; 537 // Create the G4Track << 690 538 auto aSecondaryTrack = new G4Track(aPhotonTR << 691 phi = twopi*G4UniformRand() ; 539 aSecondaryTrack->SetTouchableHandle(aStep.Ge << 692 dirX = sin(theta)*cos(phi) ; 540 aSecondaryTrack->SetParentID(aTrack.GetTrack << 693 dirY = sin(theta)*sin(phi) ; 541 aSecondaryTrack->SetCreatorModelID(secID); << 694 dirZ = cos(theta) ; 542 aParticleChange.AddSecondary(aSecondaryTrack << 695 G4ThreeVector directionTR(dirX,dirY,dirZ) ; >> 696 directionTR.rotateUz(particleDir) ; >> 697 G4DynamicParticle* aPhotonTR = new G4DynamicParticle(G4Gamma::Gamma(), >> 698 directionTR, >> 699 energyTR ) ; >> 700 aParticleChange.AddSecondary(aPhotonTR) ; 543 } 701 } 544 } 702 } 545 } 703 } 546 else 704 else 547 { 705 { 548 if(iTkin == 0) // Tkin is too small, negl << 706 if(iTkin == 0) // Tkin is too small, neglect of TR photon generation 549 { 707 { 550 return G4VDiscreteProcess::PostStepDoIt( 708 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 551 } 709 } 552 else // general case: Tkin between two ve << 710 else // general case: Tkin between two vectors of the material 553 { 711 { 554 E1 = fProtonEnergyVector->GetLowEdgeEner << 712 E1 = fProtonEnergyVector->GetLowEdgeEnergy(iTkin - 1) ; 555 E2 = fProtonEnergyVector->GetLowEdgeEner << 713 E2 = fProtonEnergyVector->GetLowEdgeEnergy(iTkin) ; 556 W = 1.0 / (E2 - E1); << 714 W = 1.0/(E2 - E1) ; 557 W1 = (E2 - TkinScaled) * W; << 715 W1 = (E2 - TkinScaled)*W ; 558 W2 = (TkinScaled - E1) * W; << 716 W2 = (TkinScaled - E1)*W ; 559 << 717 560 numOfTR = (G4int)G4Poisson((((*(*fEnergy << 718 // G4cout<<iTkin<<" mean TR number = "<<(((*(*fEnergyDistrTable)(iPlace))(0)+ 561 (*(*fAngleD << 719 // (*(*fAngleDistrTable)(iPlace))(0))*W1 + 562 W1 + << 720 // ((*(*fEnergyDistrTable)(iPlace + 1))(0)+ 563 ((*(*fEnergy << 721 // (*(*fAngleDistrTable)(iPlace + 1))(0))*W2) 564 (*(*fAngleD << 722 // *chargeSq*0.5<<G4endl ; 565 W2) * << 723 566 chargeSq * 0. << 724 numOfTR = G4Poisson((((*(*fEnergyDistrTable)(iPlace))(0)+ >> 725 (*(*fAngleDistrTable)(iPlace))(0))*W1 + >> 726 ((*(*fEnergyDistrTable)(iPlace + 1))(0)+ >> 727 (*(*fAngleDistrTable)(iPlace + 1))(0))*W2) >> 728 *chargeSq*0.5 ) ; 567 if(numOfTR == 0) 729 if(numOfTR == 0) 568 { 730 { 569 return G4VDiscreteProcess::PostStepDoI 731 return G4VDiscreteProcess::PostStepDoIt(aTrack, aStep); 570 } 732 } 571 else 733 else 572 { 734 { >> 735 // G4cout<<"Number of X-ray TR photons = "<<numOfTR<<G4endl ; >> 736 573 aParticleChange.SetNumberOfSecondaries 737 aParticleChange.SetNumberOfSecondaries(numOfTR); 574 for(iTR = 0; iTR < numOfTR; ++iTR) << 738 for(iTR=0;iTR<numOfTR;iTR++) 575 { 739 { 576 energyPos = ((*(*fEnergyDistrTable)( << 740 energyPos = ((*(*fEnergyDistrTable)(iPlace))(0)*W1+ 577 (*(*fEnergyDistrTable)( << 741 (*(*fEnergyDistrTable)(iPlace + 1))(0)*W2)*G4UniformRand() ; 578 G4UniformRand(); << 742 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 579 for(iTransfer = 0; iTransfer < fBinT << 743 { 580 { << 744 if(energyPos >= ((*(*fEnergyDistrTable)(iPlace))(iTransfer)*W1+ 581 if(energyPos >= << 745 (*(*fEnergyDistrTable)(iPlace + 1))(iTransfer)*W2)) break ; 582 ((*(*fEnergyDistrTable)(iPlace) << 746 } 583 (*(*fEnergyDistrTable)(iPlace << 747 energyTR = ((*fEnergyDistrTable)(iPlace)->GetLowEdgeEnergy(iTransfer))*W1+ 584 break; << 748 ((*fEnergyDistrTable)(iPlace + 1)->GetLowEdgeEnergy(iTransfer))*W2 ; 585 } << 586 energyTR = << 587 ((*fEnergyDistrTable)(iPlace)->Get << 588 ((*fEnergyDistrTable)(iPlace + 1)- << 589 W2; << 590 749 591 kinEnergy -= energyTR; << 750 // G4cout<<"energyTR = "<<energyTR/keV<<"keV"<<G4endl ; >> 751 >> 752 kinEnergy -= energyTR ; 592 aParticleChange.ProposeEnergy(kinEne 753 aParticleChange.ProposeEnergy(kinEnergy); 593 754 594 anglePos = ((*(*fAngleDistrTable)(iP << 755 anglePos = ((*(*fAngleDistrTable)(iPlace))(0)*W1+ 595 (*(*fAngleDistrTable)(iP << 756 (*(*fAngleDistrTable)(iPlace + 1))(0)*W2)*G4UniformRand() ; 596 G4UniformRand(); << 757 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 597 for(iTransfer = 0; iTransfer < fBinT << 758 { 598 { << 759 if(anglePos > ((*(*fAngleDistrTable)(iPlace))(iTransfer)*W1+ 599 if(anglePos > ((*(*fAngleDistrTabl << 760 (*(*fAngleDistrTable)(iPlace + 1))(iTransfer)*W2)) break ; 600 (*(*fAngleDistrTabl << 761 } 601 break; << 762 theta = sqrt(((*fAngleDistrTable)(iPlace)-> 602 } << 763 GetLowEdgeEnergy(iTransfer-1))*W1+ 603 theta = std::sqrt( << 764 ((*fAngleDistrTable)(iPlace + 1)-> 604 ((*fAngleDistrTable)(iPlace)->GetL << 765 GetLowEdgeEnergy(iTransfer-1))*W2) ; 605 W1 + << 766 606 ((*fAngleDistrTable)(iPlace + 1)-> << 767 // G4cout<<iTransfer<<" : theta = "<<theta<<G4endl ; 607 W2); << 768 608 << 769 phi = twopi*G4UniformRand() ; 609 phi = twopi * G4UniformRand(); << 770 dirX = sin(theta)*cos(phi) ; 610 dirX = std::sin(theta) * std::cos(ph << 771 dirY = sin(theta)*sin(phi) ; 611 dirY = std::sin(theta) * std::sin(ph << 772 dirZ = cos(theta) ; 612 dirZ = std::cos(theta); << 773 G4ThreeVector directionTR(dirX,dirY,dirZ) ; 613 G4ThreeVector directionTR(dirX, dirY << 774 directionTR.rotateUz(particleDir) ; 614 directionTR.rotateUz(particleDir); << 775 G4DynamicParticle* aPhotonTR = new G4DynamicParticle(G4Gamma::Gamma(), 615 auto aPhotonTR = << 776 directionTR, 616 new G4DynamicParticle(G4Gamma::Gam << 777 energyTR ) ; 617 << 778 aParticleChange.AddSecondary(aPhotonTR) ; 618 // Create the G4Track << 619 G4Track* aSecondaryTrack = new G4Track(aPh << 620 aSecondaryTrack->SetTouchableHandle(aStep. << 621 aSecondaryTrack->SetParentID(aTrack.GetTra << 622 aSecondaryTrack->SetCreatorModelID(secID); << 623 aParticleChange.AddSecondary(aSecondaryTra << 624 } 779 } 625 } 780 } 626 } 781 } 627 } 782 } 628 return &aParticleChange; << 783 return &aParticleChange ; 629 } 784 } 630 785 631 ////////////////////////////////////////////// 786 //////////////////////////////////////////////////////////////////////////// >> 787 // 632 // Test function for checking of PostStepDoIt 788 // Test function for checking of PostStepDoIt random preparation of TR photon 633 // energy 789 // energy 634 G4double G4ForwardXrayTR::GetEnergyTR(G4int iM << 790 // >> 791 >> 792 G4double >> 793 G4ForwardXrayTR::GetEnergyTR(G4int iMat, G4int jMat, G4int iTkin) const 635 { 794 { 636 G4int iPlace, numOfTR, iTR, iTransfer; << 795 G4int iPlace, numOfTR, iTR, iTransfer ; 637 G4double energyTR = 0.0; // return this val << 796 G4double energyTR = 0.0 ; // return this value for no TR photons 638 G4double energyPos; << 797 G4double energyPos ; 639 G4double W1, W2; << 798 G4double W1, W2; 640 << 799 641 const G4ProductionCutsTable* theCoupleTable << 800 const G4ProductionCutsTable* theCoupleTable= 642 G4ProductionCutsTable::GetProductionCutsTa << 801 G4ProductionCutsTable::GetProductionCutsTable(); 643 G4int numOfCouples = (G4int)theCoupleTable-> << 802 G4int numOfCouples = theCoupleTable->GetTableSize(); 644 803 645 // The case of equal or approximate (in term 804 // The case of equal or approximate (in terms of plasma energy) materials 646 // No TR photons ?! 805 // No TR photons ?! 647 806 648 const G4MaterialCutsCouple* iCouple = << 807 const G4MaterialCutsCouple* iCouple = theCoupleTable->GetMaterialCutsCouple(iMat); 649 theCoupleTable->GetMaterialCutsCouple(iMat << 808 const G4MaterialCutsCouple* jCouple = theCoupleTable->GetMaterialCutsCouple(jMat); 650 const G4MaterialCutsCouple* jCouple = << 651 theCoupleTable->GetMaterialCutsCouple(jMat << 652 const G4Material* iMaterial = iCouple->GetMa 809 const G4Material* iMaterial = iCouple->GetMaterial(); 653 const G4Material* jMaterial = jCouple->GetMa 810 const G4Material* jMaterial = jCouple->GetMaterial(); 654 811 655 if(iMat == jMat << 812 if ( iMat == jMat 656 813 657 || iMaterial->GetState() == jMaterial->Ge << 814 || iMaterial->GetState() == jMaterial->GetState() 658 815 659 || (iMaterial->GetState() == kStateSolid << 816 ||(iMaterial->GetState() == kStateSolid && jMaterial->GetState() == kStateLiquid ) 660 jMaterial->GetState() == kStateLiquid << 661 817 662 || (iMaterial->GetState() == kStateLiquid << 818 ||(iMaterial->GetState() == kStateLiquid && jMaterial->GetState() == kStateSolid ) ) 663 jMaterial->GetState() == kStateSolid) << 664 819 665 { 820 { 666 return energyTR; << 821 return energyTR ; 667 } 822 } 668 823 669 if(jMat < iMat) 824 if(jMat < iMat) 670 { 825 { 671 iPlace = (iMat * (numOfCouples - 1) + jMat << 826 iPlace = (iMat*(numOfCouples - 1) + jMat)*fTotBin + iTkin - 1 ; 672 } 827 } 673 else 828 else 674 { 829 { 675 iPlace = (iMat * (numOfCouples - 1) + jMat << 830 iPlace = (iMat*(numOfCouples - 1) + jMat - 1)*fTotBin + iTkin - 1 ; 676 } 831 } 677 G4PhysicsVector* energyVector1 = (*fEnergyDi << 832 G4PhysicsVector* energyVector1 = (*fEnergyDistrTable)(iPlace) ; 678 G4PhysicsVector* energyVector2 = (*fEnergyDi << 833 G4PhysicsVector* energyVector2 = (*fEnergyDistrTable)(iPlace + 1) ; 679 834 680 if(iTkin == fTotBin) // TR plato, try from << 835 if(iTkin == fTotBin) // TR plato, try from left 681 { 836 { 682 numOfTR = (G4int)G4Poisson((*energyVector1 << 837 numOfTR = G4Poisson( (*energyVector1)(0) ) ; 683 if(numOfTR == 0) 838 if(numOfTR == 0) 684 { 839 { 685 return energyTR; << 840 return energyTR ; 686 } 841 } 687 else 842 else 688 { 843 { 689 for(iTR = 0; iTR < numOfTR; ++iTR) << 844 for(iTR=0;iTR<numOfTR;iTR++) 690 { 845 { 691 energyPos = (*energyVector1)(0) * G4Un << 846 energyPos = (*energyVector1)(0)*G4UniformRand() ; 692 for(iTransfer = 0; iTransfer < fBinTR << 847 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 693 { << 848 { 694 if(energyPos >= (*energyVector1)(iTr << 849 if(energyPos >= (*energyVector1)(iTransfer)) break ; 695 break; << 850 } 696 } << 851 energyTR += energyVector1->GetLowEdgeEnergy(iTransfer) ; 697 energyTR += energyVector1->GetLowEdgeE << 698 } 852 } 699 } 853 } 700 } 854 } 701 else 855 else 702 { 856 { 703 if(iTkin == 0) // Tkin is too small, negl << 857 if(iTkin == 0) // Tkin is too small, neglect of TR photon generation 704 { 858 { 705 return energyTR; << 859 return energyTR ; 706 } 860 } 707 else // general case: Tkin between two ve << 861 else // general case: Tkin between two vectors of the material 708 { // use trivial mean half/half << 862 { // use trivial mean half/half 709 W1 = 0.5; << 863 W1 = 0.5 ; 710 W2 = 0.5; << 864 W2 = 0.5 ; 711 numOfTR = (G4int)G4Poisson((*energyVecto << 865 numOfTR = G4Poisson( (*energyVector1)(0)*W1 + >> 866 (*energyVector2)(0)*W2 ) ; 712 if(numOfTR == 0) 867 if(numOfTR == 0) 713 { 868 { 714 return energyTR; << 869 return energyTR ; 715 } 870 } 716 else 871 else 717 { 872 { 718 G4cout << "It is still OK in GetEnergy << 873 G4cout<<"It is still OK in GetEnergyTR(int,int,int)"<<G4endl; 719 for(iTR = 0; iTR < numOfTR; ++iTR) << 874 for(iTR=0;iTR<numOfTR;iTR++) 720 { 875 { 721 energyPos = ((*energyVector1)(0) * W << 876 energyPos = ((*energyVector1)(0)*W1+ 722 G4UniformRand(); << 877 (*energyVector2)(0)*W2)*G4UniformRand() ; 723 for(iTransfer = 0; iTransfer < fBinT << 878 for(iTransfer=0;iTransfer<fBinTR-1;iTransfer++) 724 { << 879 { 725 if(energyPos >= ((*energyVector1)( << 880 if(energyPos >= ((*energyVector1)(iTransfer)*W1+ 726 (*energyVector2)( << 881 (*energyVector2)(iTransfer)*W2)) break ; 727 break; << 882 } 728 } << 883 energyTR += (energyVector1->GetLowEdgeEnergy(iTransfer))*W1+ 729 energyTR += (energyVector1->GetLowEd << 884 (energyVector2->GetLowEdgeEnergy(iTransfer))*W2 ; 730 (energyVector2->GetLowEd << 885 731 } 886 } 732 } 887 } 733 } 888 } 734 } 889 } 735 890 736 return energyTR; << 891 return energyTR ; 737 } 892 } 738 893 739 ////////////////////////////////////////////// 894 //////////////////////////////////////////////////////////////////////////// >> 895 // 740 // Test function for checking of PostStepDoIt 896 // Test function for checking of PostStepDoIt random preparation of TR photon 741 // theta angle relative to particle direction 897 // theta angle relative to particle direction 742 G4double G4ForwardXrayTR::GetThetaTR(G4int, G4 << 898 // 743 899 744 G4int G4ForwardXrayTR::GetSympsonNumber() { re << 745 900 746 G4int G4ForwardXrayTR::GetBinTR() { return fBi << 901 G4double >> 902 G4ForwardXrayTR::GetThetaTR(G4int, G4int, G4int) const >> 903 { >> 904 G4double theta = 0.0 ; >> 905 >> 906 return theta ; >> 907 } 747 908 748 G4double G4ForwardXrayTR::GetMinProtonTkin() { << 749 909 750 G4double G4ForwardXrayTR::GetMaxProtonTkin() { << 751 910 752 G4int G4ForwardXrayTR::GetTotBin() { return fT << 911 // end of G4ForwardXrayTR implementation file >> 912 // >> 913 /////////////////////////////////////////////////////////////////////////// 753 914