Geant4 Cross Reference

Cross-Referencing   Geant4
Geant4/examples/extended/optical/wls/src/WLSPrimaryGeneratorAction.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 /examples/extended/optical/wls/src/WLSPrimaryGeneratorAction.cc (Version 11.3.0) and /examples/extended/optical/wls/src/WLSPrimaryGeneratorAction.cc (Version 9.6.p4)


  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 //                                             << 
 27 /// \file optical/wls/src/WLSPrimaryGeneratorA     26 /// \file optical/wls/src/WLSPrimaryGeneratorAction.cc
 28 /// \brief Implementation of the WLSPrimaryGen     27 /// \brief Implementation of the WLSPrimaryGeneratorAction class
 29 //                                                 28 //
 30 //                                                 29 //
                                                   >>  30 //
 31                                                    31 
 32 #include "WLSPrimaryGeneratorAction.hh"        <<  32 #include "G4ios.hh"
 33                                                << 
 34 #include "WLSDetectorConstruction.hh"          << 
 35 #include "WLSPrimaryGeneratorMessenger.hh"     << 
 36                                                << 
 37 #include "G4AutoLock.hh"                       << 
 38 #include "G4Event.hh"                              33 #include "G4Event.hh"
                                                   >>  34 
 39 #include "G4GeneralParticleSource.hh"              35 #include "G4GeneralParticleSource.hh"
                                                   >>  36 
 40 #include "G4Material.hh"                           37 #include "G4Material.hh"
 41 #include "G4MaterialPropertiesTable.hh"            38 #include "G4MaterialPropertiesTable.hh"
 42 #include "G4OpticalPhoton.hh"                  <<  39 
                                                   >>  40 #include "G4ParticleTable.hh"
                                                   >>  41 #include "G4ParticleDefinition.hh"
                                                   >>  42 
 43 #include "G4PhysicsTable.hh"                       43 #include "G4PhysicsTable.hh"
 44 #include "G4SystemOfUnits.hh"                  <<  44 
 45 #include "G4UImanager.hh"                      << 
 46 #include "Randomize.hh"                            45 #include "Randomize.hh"
 47                                                    46 
 48 namespace                                      <<  47 #include "WLSPrimaryGeneratorAction.hh"
 49 {                                              << 
 50 G4Mutex gen_mutex = G4MUTEX_INITIALIZER;       << 
 51 }                                              << 
 52                                                    48 
 53 //....oooOO0OOooo........oooOO0OOooo........oo <<  49 #include "WLSDetectorConstruction.hh"
                                                   >>  50 #include "WLSPrimaryGeneratorMessenger.hh"
                                                   >>  51 
                                                   >>  52 #include "G4SystemOfUnits.hh"
 54                                                    53 
 55 G4bool WLSPrimaryGeneratorAction::fFirst = fal <<  54 G4bool WLSPrimaryGeneratorAction::first = false;
 56                                                    55 
 57 WLSPrimaryGeneratorAction::WLSPrimaryGenerator <<  56 WLSPrimaryGeneratorAction::
                                                   >>  57                          WLSPrimaryGeneratorAction(WLSDetectorConstruction* DC)
 58 {                                                  58 {
 59   fDetector = dc;                              <<  59   detector = DC;
                                                   >>  60   theIntegralTable = NULL;
 60                                                    61 
 61   fParticleGun = new G4GeneralParticleSource() <<  62   particleGun = new G4GeneralParticleSource();
 62   fGunMessenger = new WLSPrimaryGeneratorMesse <<  63  
 63 }                                              <<  64   gunMessenger = new WLSPrimaryGeneratorMessenger(this);
                                                   >>  65 
                                                   >>  66   // G4String particleName;
                                                   >>  67   // G4ParticleTable* particleTable = G4ParticleTable::GetParticleTable();
 64                                                    68 
 65 //....oooOO0OOooo........oooOO0OOooo........oo <<  69   timeConstant = 0.;
                                                   >>  70 
                                                   >>  71 //  particleGun->SetParticleDefinition(particleTable->
                                                   >>  72 //                               FindParticle(particleName="opticalphoton"));
                                                   >>  73 }
 66                                                    74 
 67 WLSPrimaryGeneratorAction::~WLSPrimaryGenerato     75 WLSPrimaryGeneratorAction::~WLSPrimaryGeneratorAction()
 68 {                                                  76 {
 69   delete fParticleGun;                         <<  77   delete particleGun;
 70   delete fGunMessenger;                        <<  78   delete gunMessenger;
 71   if (fIntegralTable) {                        <<  79   if (theIntegralTable) {
 72     fIntegralTable->clearAndDestroy();         <<  80      theIntegralTable->clearAndDestroy();
 73     delete fIntegralTable;                     <<  81      delete theIntegralTable;
 74   }                                                82   }
 75 }                                                  83 }
 76                                                    84 
 77 //....oooOO0OOooo........oooOO0OOooo........oo << 
 78                                                << 
 79 void WLSPrimaryGeneratorAction::SetDecayTimeCo     85 void WLSPrimaryGeneratorAction::SetDecayTimeConstant(G4double time)
 80 {                                                  86 {
 81   fTimeConstant = time;                        <<  87   timeConstant = time;
 82 }                                                  88 }
 83                                                    89 
 84 //....oooOO0OOooo........oooOO0OOooo........oo << 
 85                                                << 
 86 void WLSPrimaryGeneratorAction::BuildEmissionS     90 void WLSPrimaryGeneratorAction::BuildEmissionSpectrum()
 87 {                                                  91 {
 88   if (fIntegralTable) return;                  <<  92    if (theIntegralTable) return;
 89                                                << 
 90   const G4MaterialTable* theMaterialTable = G4 << 
 91   G4int numOfMaterials = G4Material::GetNumber << 
 92                                                    93 
 93   if (!fIntegralTable) fIntegralTable = new G4 <<  94    const G4MaterialTable* theMaterialTable = G4Material::GetMaterialTable();
 94                                                    95 
 95   for (G4int i = 0; i < numOfMaterials; ++i) { <<  96    G4int numOfMaterials = G4Material::GetNumberOfMaterials();
 96     auto vec = new G4PhysicsFreeVector();      << 
 97                                                    97 
 98     G4MaterialPropertiesTable* MPT = (*theMate <<  98    if(!theIntegralTable)theIntegralTable = new G4PhysicsTable(numOfMaterials);
 99                                                    99 
100     if (MPT) {                                 << 100    for (G4int i=0 ; i < numOfMaterials; i++) {
101       G4MaterialPropertyVector* theWLSVector = << 101 
102                                                << 102        G4PhysicsOrderedFreeVector* aPhysicsOrderedFreeVector =
103       if (theWLSVector) {                      << 103                                            new G4PhysicsOrderedFreeVector();
104         G4double currentIN = (*theWLSVector)[0 << 104 
105         if (currentIN >= 0.0) {                << 105        G4Material* aMaterial = (*theMaterialTable)[i];
106           G4double currentPM = theWLSVector->E << 106 
107           G4double currentCII = 0.0;           << 107        G4MaterialPropertiesTable* aMaterialPropertiesTable =
108           vec->InsertValues(currentPM, current << 108                                     aMaterial->GetMaterialPropertiesTable();
109           G4double prevPM = currentPM;         << 109 
110           G4double prevCII = currentCII;       << 110        if (aMaterialPropertiesTable) {
111           G4double prevIN = currentIN;         << 111           G4MaterialPropertyVector* theWLSVector =
112                                                << 112                       aMaterialPropertiesTable->GetProperty("WLSCOMPONENT");
113           for (size_t j = 1; j < theWLSVector- << 113 
114             currentPM = theWLSVector->Energy(j << 114           if (theWLSVector) {
115             currentIN = (*theWLSVector)[j];    << 115              G4double currentIN = (*theWLSVector)[0];
116             currentCII = 0.5 * (prevIN + curre << 116              if (currentIN >= 0.0) {
117             currentCII = prevCII + (currentPM  << 117                 G4double currentPM = theWLSVector->Energy(0);
118             vec->InsertValues(currentPM, curre << 118                 G4double currentCII = 0.0;
119             prevPM = currentPM;                << 119                 aPhysicsOrderedFreeVector->
120             prevCII = currentCII;              << 120                                      InsertValues(currentPM , currentCII);
121             prevIN = currentIN;                << 121                 G4double prevPM  = currentPM;
                                                   >> 122                 G4double prevCII = currentCII;
                                                   >> 123                 G4double prevIN  = currentIN;
                                                   >> 124 
                                                   >> 125                 for (size_t j = 1;
                                                   >> 126                      j < theWLSVector->GetVectorLength();
                                                   >> 127                      j++)
                                                   >> 128                 {
                                                   >> 129                   currentPM = theWLSVector->Energy(j);
                                                   >> 130                   currentIN = (*theWLSVector)[j];
                                                   >> 131                   currentCII = 0.5 * (prevIN + currentIN);
                                                   >> 132                   currentCII = prevCII + (currentPM - prevPM) * currentCII;
                                                   >> 133                   aPhysicsOrderedFreeVector->
                                                   >> 134                                      InsertValues(currentPM, currentCII);
                                                   >> 135                   prevPM  = currentPM;
                                                   >> 136                   prevCII = currentCII;
                                                   >> 137                   prevIN  = currentIN;
                                                   >> 138                 }
                                                   >> 139              }
122           }                                       140           }
123         }                                      << 141        }
124       }                                        << 142        theIntegralTable->insertAt(i,aPhysicsOrderedFreeVector);
125     }                                          << 143    }
126     fIntegralTable->insertAt(i, vec);          << 
127   }                                            << 
128 }                                                 144 }
129                                                   145 
130 //....oooOO0OOooo........oooOO0OOooo........oo << 
131                                                << 
132 void WLSPrimaryGeneratorAction::GeneratePrimar    146 void WLSPrimaryGeneratorAction::GeneratePrimaries(G4Event* anEvent)
133 {                                                 147 {
134   if (!fFirst) {                               << 148   if (!first) {
135     fFirst = true;                             << 149      first = true;
136     BuildEmissionSpectrum();                   << 150      BuildEmissionSpectrum();
137   }                                               151   }
138                                                   152 
139   if (fUseSampledEnergy) {                     << 
140     const G4MaterialTable* theMaterialTable =  << 
141                                                   153 
142     G4double sampledEnergy = 3. * eV;          << 154 #ifdef use_sampledEnergy
                                                   >> 155   const G4MaterialTable* theMaterialTable = G4Material::GetMaterialTable();
143                                                   156 
144     for (size_t j = 0; j < theMaterialTable->s << 157   G4double sampledEnergy = 3*eV;
145       G4Material* fMaterial = (*theMaterialTab << 
146       if (fMaterial->GetName() == "PMMA") {    << 
147         auto WLSIntensity = fMaterial->GetMate << 
148                                                   158 
149         if (WLSIntensity) {                    << 159   for (size_t j=0 ; j<theMaterialTable->size() ; j++) {
150           auto WLSIntegral = (G4PhysicsFreeVec << 160       G4Material* fMaterial = (*theMaterialTable)[j];
                                                   >> 161       if (fMaterial->GetName() == "PMMA" ) {
                                                   >> 162          G4MaterialPropertiesTable* aMaterialPropertiesTable =
                                                   >> 163                                       fMaterial->GetMaterialPropertiesTable();
                                                   >> 164          const G4MaterialPropertyVector* WLSIntensity =
                                                   >> 165                    aMaterialPropertiesTable->GetProperty("WLSCOMPONENT");
                                                   >> 166 
                                                   >> 167          if (WLSIntensity) {
                                                   >> 168             G4int MaterialIndex = fMaterial->GetIndex();
                                                   >> 169             G4PhysicsOrderedFreeVector* WLSIntegral =
                                                   >> 170               (G4PhysicsOrderedFreeVector*)((*theIntegralTable)(MaterialIndex));
151                                                   171 
152           G4double CIImax = WLSIntegral->GetMa << 172             G4double CIImax = WLSIntegral->GetMaxValue();
153           G4double CIIvalue = G4UniformRand()  << 173             G4double CIIvalue = G4UniformRand()*CIImax;
154                                                   174 
155           sampledEnergy = WLSIntegral->GetEner << 175             sampledEnergy = WLSIntegral->GetEnergy(CIIvalue);
156         }                                      << 176          }
157       }                                           177       }
158     }                                          << 
159                                                << 
160     // this does not work.                     << 
161     G4String cmd = "/gun/energy " + G4UIcomman << 
162     G4UImanager::GetUIpointer()->ApplyCommand( << 
163   }                                               178   }
164                                                   179 
165   // The code behind this line is not thread s << 180   //particleGun->SetParticleEnergy(sampledEnergy);
166   // and time are randomly selected and GPS pr << 181 #endif
167                                                   182 
168   G4AutoLock l(&gen_mutex);                    << 183   if(particleGun->GetParticleDefinition()->GetParticleName()=="opticalphoton"){
169   if (fParticleGun->GetParticleDefinition() == << 
170     SetOptPhotonPolar();                          184     SetOptPhotonPolar();
171     SetOptPhotonTime();                           185     SetOptPhotonTime();
172   }                                               186   }
173                                                   187 
174   fParticleGun->GeneratePrimaryVertex(anEvent) << 188   particleGun->GeneratePrimaryVertex(anEvent);
175 }                                                 189 }
176                                                   190 
177 //....oooOO0OOooo........oooOO0OOooo........oo << 
178                                                << 
179 void WLSPrimaryGeneratorAction::SetOptPhotonPo    191 void WLSPrimaryGeneratorAction::SetOptPhotonPolar()
180 {                                                 192 {
181   G4double angle = G4UniformRand() * 360.0 * d << 193   G4double angle = G4UniformRand() * 360.0*deg;
182   SetOptPhotonPolar(angle);                       194   SetOptPhotonPolar(angle);
183 }                                                 195 }
184                                                   196 
185 //....oooOO0OOooo........oooOO0OOooo........oo << 
186                                                << 
187 void WLSPrimaryGeneratorAction::SetOptPhotonPo    197 void WLSPrimaryGeneratorAction::SetOptPhotonPolar(G4double angle)
188 {                                                 198 {
189   if (fParticleGun->GetParticleDefinition()->G << 199   if (particleGun->GetParticleDefinition()->GetParticleName()!="opticalphoton")
190     G4cout << "-> warning from WLSPrimaryGener << 200   {
191            << ":  the ParticleGun is not an op << 201      G4cout << "-> warning from WLSPrimaryGeneratorAction::SetOptPhotonPolar()"
192     return;                                    << 202             << ":  the particleGun is not an opticalphoton" << G4endl;
                                                   >> 203      return;
193   }                                               204   }
194                                                   205 
195   G4ThreeVector normal(1., 0., 0.);            << 206   G4ThreeVector normal (1., 0., 0.);
196   G4ThreeVector kphoton = fParticleGun->GetPar << 207   G4ThreeVector kphoton = particleGun->GetParticleMomentumDirection();
197   G4ThreeVector product = normal.cross(kphoton    208   G4ThreeVector product = normal.cross(kphoton);
198   G4double modul2 = product * product;         << 209   G4double modul2       = product*product;
199                                                   210 
200   G4ThreeVector e_perpend(0., 0., 1.);         << 211   G4ThreeVector e_perpend (0., 0., 1.);
201   if (modul2 > 0.) e_perpend = (1. / std::sqrt << 212   if (modul2 > 0.) e_perpend = (1./std::sqrt(modul2))*product;
202   G4ThreeVector e_paralle = e_perpend.cross(kp << 213   G4ThreeVector e_paralle    = e_perpend.cross(kphoton);
203                                                   214 
204   G4ThreeVector polar = std::cos(angle) * e_pa << 215   G4ThreeVector polar = std::cos(angle)*e_paralle + std::sin(angle)*e_perpend;
205   fParticleGun->SetParticlePolarization(polar) << 216   particleGun->SetParticlePolarization(polar);
206 }                                              << 
207                                                   217 
208 //....oooOO0OOooo........oooOO0OOooo........oo << 218 }
209                                                   219 
210 void WLSPrimaryGeneratorAction::SetOptPhotonTi    220 void WLSPrimaryGeneratorAction::SetOptPhotonTime()
211 {                                                 221 {
212   G4double time = -std::log(G4UniformRand()) * << 222    G4double time = -std::log(G4UniformRand())*timeConstant;
213   fParticleGun->SetParticleTime(time);         << 223    particleGun->SetParticleTime(time);
214 }                                                 224 }
215                                                   225