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 // This example is provided by the Geant4-DNA 26 // This example is provided by the Geant4-DNA collaboration 27 // Any report or published results obtained us 27 // Any report or published results obtained using the Geant4-DNA software 28 // shall cite the following Geant4-DNA collabo 28 // shall cite the following Geant4-DNA collaboration publication: 29 // Med. Phys. 37 (2010) 4692-4708 29 // Med. Phys. 37 (2010) 4692-4708 30 // The Geant4-DNA web site is available at htt 30 // The Geant4-DNA web site is available at http://geant4-dna.org 31 // 31 // 32 // If you use this example, please cite the fo 32 // If you use this example, please cite the following publication: 33 // Rad. Prot. Dos. 133 (2009) 2-11 33 // Rad. Prot. Dos. 133 (2009) 2-11 34 // 34 // 35 #include "RunAction.hh" 35 #include "RunAction.hh" 36 36 37 #include "G4UImanager.hh" 37 #include "G4UImanager.hh" 38 #include "G4AnalysisManager.hh" 38 #include "G4AnalysisManager.hh" 39 #include "Randomize.hh" 39 #include "Randomize.hh" 40 40 41 RunAction::RunAction(const DetectorConstructio 41 RunAction::RunAction(const DetectorConstruction* det) 42 :fDetector(det) 42 :fDetector(det) 43 { 43 { 44 fSaveRndm = 0; 44 fSaveRndm = 0; 45 fDose3DDose = nullptr; 45 fDose3DDose = nullptr; 46 fMapVoxels = nullptr; 46 fMapVoxels = nullptr; 47 } 47 } 48 48 49 RunAction::~RunAction() 49 RunAction::~RunAction() 50 { 50 { 51 if (fDose3DDose) delete[] fDose3DDose; 51 if (fDose3DDose) delete[] fDose3DDose; 52 if (fMapVoxels) delete[] fMapVoxels; 52 if (fMapVoxels) delete[] fMapVoxels; 53 } 53 } 54 54 55 void RunAction::BeginOfRunAction(const G4Run*) 55 void RunAction::BeginOfRunAction(const G4Run*) 56 { 56 { 57 // Read phantom - Singleton 57 // Read phantom - Singleton 58 CellParameterisation* fMyCellParameterisatio 58 CellParameterisation* fMyCellParameterisation = CellParameterisation::Instance(); 59 59 60 // Histograms 60 // Histograms 61 // Get/create analysis manager 61 // Get/create analysis manager 62 G4cout << "##### Create analysis manager " < 62 G4cout << "##### Create analysis manager " << " " << this << G4endl; 63 63 64 G4AnalysisManager* man = G4AnalysisManager:: 64 G4AnalysisManager* man = G4AnalysisManager::Instance(); 65 man->SetDefaultFileType("root"); 65 man->SetDefaultFileType("root"); 66 66 67 G4cout << "Using " << man->GetType() << " an 67 G4cout << "Using " << man->GetType() << " analysis manager" << G4endl; 68 68 69 // Open an output file 69 // Open an output file 70 man->OpenFile("microbeam"); 70 man->OpenFile("microbeam"); 71 man->SetFirstNtupleId(1); 71 man->SetFirstNtupleId(1); 72 72 73 //Declare ntuples 73 //Declare ntuples 74 // 74 // 75 // Create 1st ntuple (id = 1) 75 // Create 1st ntuple (id = 1) 76 // 76 // 77 man->CreateNtuple("ntuple0", "Stopping power 77 man->CreateNtuple("ntuple0", "Stopping power"); 78 man->CreateNtupleDColumn("e"); 78 man->CreateNtupleDColumn("e"); 79 man->CreateNtupleDColumn("sp"); 79 man->CreateNtupleDColumn("sp"); 80 man->FinishNtuple(); 80 man->FinishNtuple(); 81 //G4cout << "Ntuple-1 created" << G4endl; 81 //G4cout << "Ntuple-1 created" << G4endl; 82 82 83 // 83 // 84 // Create 2nd ntuple (id = 2) 84 // Create 2nd ntuple (id = 2) 85 // 85 // 86 man->CreateNtuple("ntuple1", "Beam position" 86 man->CreateNtuple("ntuple1", "Beam position"); 87 man->CreateNtupleDColumn("x"); 87 man->CreateNtupleDColumn("x"); 88 man->CreateNtupleDColumn("y"); 88 man->CreateNtupleDColumn("y"); 89 man->FinishNtuple(); 89 man->FinishNtuple(); 90 //G4cout << "Ntuple-2 created" << G4endl; 90 //G4cout << "Ntuple-2 created" << G4endl; 91 91 92 // 92 // 93 // Create 3rd ntuple (id = 3) 93 // Create 3rd ntuple (id = 3) 94 // 94 // 95 man->CreateNtuple("ntuple2", "Range"); 95 man->CreateNtuple("ntuple2", "Range"); 96 man->CreateNtupleDColumn("x"); 96 man->CreateNtupleDColumn("x"); 97 man->CreateNtupleDColumn("y"); 97 man->CreateNtupleDColumn("y"); 98 man->CreateNtupleDColumn("z"); 98 man->CreateNtupleDColumn("z"); 99 man->FinishNtuple(); 99 man->FinishNtuple(); 100 //G4cout << "Ntuple-3 created" << G4endl; 100 //G4cout << "Ntuple-3 created" << G4endl; 101 101 102 // 102 // 103 // Create 4th ntuple (id = 4) 103 // Create 4th ntuple (id = 4) 104 // 104 // 105 man->CreateNtuple("ntuple3", "Doses"); 105 man->CreateNtuple("ntuple3", "Doses"); 106 man->CreateNtupleDColumn("doseN"); 106 man->CreateNtupleDColumn("doseN"); 107 man->CreateNtupleDColumn("doseC"); 107 man->CreateNtupleDColumn("doseC"); 108 man->FinishNtuple(); 108 man->FinishNtuple(); 109 //G4cout << "Ntuple-4 created" << G4endl; 109 //G4cout << "Ntuple-4 created" << G4endl; 110 110 111 // 111 // 112 // Create 5th ntuple (id = 5) 112 // Create 5th ntuple (id = 5) 113 // 113 // 114 man->CreateNtuple("ntuple4", "3D"); 114 man->CreateNtuple("ntuple4", "3D"); 115 man->CreateNtupleDColumn("x"); 115 man->CreateNtupleDColumn("x"); 116 man->CreateNtupleDColumn("y"); 116 man->CreateNtupleDColumn("y"); 117 man->CreateNtupleDColumn("z"); 117 man->CreateNtupleDColumn("z"); 118 man->CreateNtupleDColumn("doseV"); 118 man->CreateNtupleDColumn("doseV"); 119 man->FinishNtuple(); 119 man->FinishNtuple(); 120 //G4cout << "Ntuple-3 created" << G4endl; 120 //G4cout << "Ntuple-3 created" << G4endl; 121 121 122 G4cout << "All Ntuples have been created " < 122 G4cout << "All Ntuples have been created " << G4endl; 123 123 124 // save Rndm status 124 // save Rndm status 125 if (fSaveRndm > 0) 125 if (fSaveRndm > 0) 126 { 126 { 127 CLHEP::HepRandom::showEngineStatus(); 127 CLHEP::HepRandom::showEngineStatus(); 128 CLHEP::HepRandom::saveEngineStatus("beginO 128 CLHEP::HepRandom::saveEngineStatus("beginOfRun.rndm"); 129 } 129 } 130 130 131 fNumEvent = 0; 131 fNumEvent = 0; 132 fNbOfHitsGas = 0; 132 fNbOfHitsGas = 0; 133 133 134 // ABSORBED DOSES INITIALIZATION 134 // ABSORBED DOSES INITIALIZATION 135 fDoseN = 0; 135 fDoseN = 0; 136 fDoseC = 0; 136 fDoseC = 0; 137 137 138 fMassCytoplasm = fDetector->GetMassCytoplasm 138 fMassCytoplasm = fDetector->GetMassCytoplasm(); 139 fMassNucleus = fDetector->GetMassNucleus() 139 fMassNucleus = fDetector->GetMassNucleus(); 140 fNbOfPixels = fDetector->GetNbOfPixelsInPhan 140 fNbOfPixels = fDetector->GetNbOfPixelsInPhantom(); 141 141 142 fMapVoxels = new G4ThreeVector[fNbOfPixels]; 142 fMapVoxels = new G4ThreeVector[fNbOfPixels]; 143 fDose3DDose = new G4double[fNbOfPixels]; 143 fDose3DDose = new G4double[fNbOfPixels]; 144 144 145 for (G4int i=0; i<fNbOfPixels; i++) 145 for (G4int i=0; i<fNbOfPixels; i++) 146 { 146 { 147 fMapVoxels [i]=fMyCellParameterisation->Ge 147 fMapVoxels [i]=fMyCellParameterisation->GetVoxelThreeVector(i); 148 fDose3DDose[i]=0; 148 fDose3DDose[i]=0; 149 } 149 } 150 } 150 } 151 151 152 void RunAction::EndOfRunAction(const G4Run* /* 152 void RunAction::EndOfRunAction(const G4Run* /*aRun*/) 153 { 153 { 154 G4AnalysisManager* man = G4AnalysisManager:: 154 G4AnalysisManager* man = G4AnalysisManager::Instance(); 155 155 156 // save Rndm status 156 // save Rndm status 157 if (fSaveRndm == 1) 157 if (fSaveRndm == 1) 158 { 158 { 159 CLHEP::HepRandom::showEngineStatus(); 159 CLHEP::HepRandom::showEngineStatus(); 160 CLHEP::HepRandom::saveEngineStatus("endOfR 160 CLHEP::HepRandom::saveEngineStatus("endOfRun.rndm"); 161 } 161 } 162 162 163 for (G4int i=0; i<fNbOfPixels; i++) 163 for (G4int i=0; i<fNbOfPixels; i++) 164 { 164 { 165 if (fDose3DDose[i]>0) 165 if (fDose3DDose[i]>0) 166 { 166 { 167 G4ThreeVector v; 167 G4ThreeVector v; 168 v = fMapVoxels[i]; 168 v = fMapVoxels[i]; 169 man->FillNtupleDColumn(5,0,v.x()); 169 man->FillNtupleDColumn(5,0,v.x()); 170 man->FillNtupleDColumn(5,1,v.y()); 170 man->FillNtupleDColumn(5,1,v.y()); 171 man->FillNtupleDColumn(5,2,v.z()); 171 man->FillNtupleDColumn(5,2,v.z()); 172 man->FillNtupleDColumn(5,3,fDose3DDose[i 172 man->FillNtupleDColumn(5,3,fDose3DDose[i]); 173 man->AddNtupleRow(5); 173 man->AddNtupleRow(5); 174 } 174 } 175 } 175 } 176 176 177 G4cout << "-> Total number of particles dete 177 G4cout << "-> Total number of particles detected by the gas detector : " << GetNbOfHitsGas() << G4endl; 178 G4cout << G4endl; 178 G4cout << G4endl; 179 179 180 //save histograms 180 //save histograms 181 man->Write(); 181 man->Write(); 182 man->CloseFile(); 182 man->CloseFile(); 183 183 184 // Complete clean-up 184 // Complete clean-up 185 man->Clear(); 185 man->Clear(); 186 } 186 } 187 187