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 // G4AdjointSteppingAction class implementatio 26 // G4AdjointSteppingAction class implementation 27 // 27 // 28 // Author: L. Desorgher, SpaceIT GmbH 28 // Author: L. Desorgher, SpaceIT GmbH 29 // Contract: ESA contract 21435/08/NL/AT 29 // Contract: ESA contract 21435/08/NL/AT 30 // Customer: ESA/ESTEC 30 // Customer: ESA/ESTEC 31 // ------------------------------------------- 31 // -------------------------------------------------------------------- 32 32 33 #include "G4AdjointSteppingAction.hh" 33 #include "G4AdjointSteppingAction.hh" 34 << 35 #include "G4AdjointCrossSurfChecker.hh" << 36 #include "G4AffineTransform.hh" << 37 #include "G4PhysicalVolumeStore.hh" << 38 #include "G4Track.hh" 34 #include "G4Track.hh" >> 35 #include "G4PhysicalVolumeStore.hh" >> 36 #include "G4AffineTransform.hh" >> 37 #include "G4AdjointCrossSurfChecker.hh" 39 38 40 ////////////////////////////////////////////// 39 ////////////////////////////////////////////////////////////////////////////// 41 // 40 // 42 G4AdjointSteppingAction::G4AdjointSteppingActi 41 G4AdjointSteppingAction::G4AdjointSteppingAction() 43 { << 42 { 44 theG4AdjointCrossSurfChecker = G4AdjointCros 43 theG4AdjointCrossSurfChecker = G4AdjointCrossSurfChecker::GetInstance(); 45 } 44 } 46 45 47 ////////////////////////////////////////////// 46 ////////////////////////////////////////////////////////////////////////////// 48 // 47 // >> 48 G4AdjointSteppingAction::~G4AdjointSteppingAction() >> 49 { >> 50 } >> 51 >> 52 ////////////////////////////////////////////////////////////////////////////// >> 53 // 49 void G4AdjointSteppingAction::UserSteppingActi 54 void G4AdjointSteppingAction::UserSteppingAction(const G4Step* aStep) 50 { 55 { 51 G4Track* aTrack = aStep->GetTrack(); 56 G4Track* aTrack = aStep->GetTrack(); 52 if (! is_adjoint_tracking_mode) // forward << 57 if(!is_adjoint_tracking_mode) // forward tracking mode 53 { 58 { 54 if (! did_one_adj_part_reach_ext_source_du << 59 if (!did_one_adj_part_reach_ext_source_during_event) >> 60 { 55 aTrack->SetTrackStatus(fStopAndKill); 61 aTrack->SetTrackStatus(fStopAndKill); 56 return; 62 return; 57 } 63 } 58 if (theUserFwdSteppingAction != nullptr) { << 64 if(theUserFwdSteppingAction) >> 65 { 59 theUserFwdSteppingAction->UserSteppingAc 66 theUserFwdSteppingAction->UserSteppingAction(aStep); 60 } 67 } 61 return; 68 return; 62 } 69 } 63 70 64 // Apply first the user adjoint stepping act 71 // Apply first the user adjoint stepping action 65 // ----------------------------------------- 72 // -------------------------------------------- 66 73 67 did_adj_part_reach_ext_source = false; 74 did_adj_part_reach_ext_source = false; 68 if (theUserAdjointSteppingAction != nullptr) << 75 if (theUserAdjointSteppingAction) >> 76 { 69 theUserAdjointSteppingAction->UserStepping 77 theUserAdjointSteppingAction->UserSteppingAction(aStep); 70 } 78 } 71 79 72 G4double nb_nuc = 1.; 80 G4double nb_nuc = 1.; 73 G4ParticleDefinition* thePartDef = aTrack->G 81 G4ParticleDefinition* thePartDef = aTrack->GetDefinition(); 74 << 82 75 if (thePartDef->GetParticleType() == "adjoin << 83 if (thePartDef->GetParticleType() == "adjoint_nucleus") >> 84 { 76 nb_nuc = G4double(thePartDef->GetBaryonNum 85 nb_nuc = G4double(thePartDef->GetBaryonNumber()); 77 } 86 } 78 87 79 // Kill conditions for adjoint particles rea 88 // Kill conditions for adjoint particles reaching the maximum energy 80 // ----------------------------------------- 89 // ----------------------------------------------------------------- 81 90 82 if (aTrack->GetKineticEnergy() >= ext_source << 91 if(aTrack->GetKineticEnergy() >= ext_sourceEMax*nb_nuc) >> 92 { 83 aTrack->SetTrackStatus(fStopAndKill); 93 aTrack->SetTrackStatus(fStopAndKill); 84 did_adj_part_reach_ext_source = false; 94 did_adj_part_reach_ext_source = false; 85 return; 95 return; 86 } 96 } 87 << 97 88 // Kill conditions for surface crossing 98 // Kill conditions for surface crossing 89 // -------------------------------------- 99 // -------------------------------------- 90 100 91 G4String surface_name; 101 G4String surface_name; 92 G4double cos_to_surface; 102 G4double cos_to_surface; 93 G4bool GoingIn; 103 G4bool GoingIn; 94 G4ThreeVector crossing_pos; 104 G4ThreeVector crossing_pos; 95 if (theG4AdjointCrossSurfChecker->CrossingOn << 105 if (theG4AdjointCrossSurfChecker 96 aStep, surface_name, crossing_pos, cos << 106 ->CrossingOneOfTheRegisteredSurface(aStep, surface_name, >> 107 crossing_pos, cos_to_surface, GoingIn)) 97 { 108 { 98 if (surface_name == "ExternalSource") { << 109 if (surface_name == "ExternalSource") >> 110 { 99 // Registering still needed 111 // Registering still needed 100 did_adj_part_reach_ext_source = true; 112 did_adj_part_reach_ext_source = true; 101 did_one_adj_part_reach_ext_source_during 113 did_one_adj_part_reach_ext_source_during_event = true; 102 aTrack->SetTrackStatus(fStopAndKill); 114 aTrack->SetTrackStatus(fStopAndKill); 103 115 104 // now register the adjoint particles re 116 // now register the adjoint particles reaching the external surface 105 last_momentum = aTrack->GetMomentum(); 117 last_momentum = aTrack->GetMomentum(); 106 last_ekin = aTrack->GetKineticEnergy(); 118 last_ekin = aTrack->GetKineticEnergy(); 107 last_weight = aTrack->GetWeight(); 119 last_weight = aTrack->GetWeight(); 108 last_part_def = aTrack->GetDefinition(); 120 last_part_def = aTrack->GetDefinition(); 109 last_pos = crossing_pos; 121 last_pos = crossing_pos; 110 return; 122 return; 111 } 123 } 112 if (surface_name == "AdjointSource" && Goi << 124 else if (surface_name == "AdjointSource" && GoingIn) >> 125 { 113 did_adj_part_reach_ext_source = false; 126 did_adj_part_reach_ext_source = false; 114 aTrack->SetTrackStatus(fStopAndKill); 127 aTrack->SetTrackStatus(fStopAndKill); 115 return; 128 return; 116 } << 129 } 117 } 130 } 118 131 119 // Check for reaching out of world 132 // Check for reaching out of world 120 // 133 // 121 if (aStep->GetPostStepPoint()->GetStepStatus << 134 if (aStep->GetPostStepPoint()->GetStepStatus() == fWorldBoundary) >> 135 { 122 did_adj_part_reach_ext_source = true; 136 did_adj_part_reach_ext_source = true; 123 did_one_adj_part_reach_ext_source_during_e 137 did_one_adj_part_reach_ext_source_during_event = true; 124 last_momentum = aTrack->GetMomentum(); << 138 last_momentum =aTrack->GetMomentum(); 125 last_ekin = aTrack->GetKineticEnergy(); << 139 last_ekin=aTrack->GetKineticEnergy(); 126 last_weight = aTrack->GetWeight(); 140 last_weight = aTrack->GetWeight(); 127 last_part_def = aTrack->GetDefinition(); 141 last_part_def = aTrack->GetDefinition(); 128 last_pos = crossing_pos; 142 last_pos = crossing_pos; 129 return; 143 return; 130 } 144 } 131 } 145 } 132 146