| 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 // Please cite the following paper if you use 26 // Please cite the following paper if you use this software
27 // Nucl.Instrum.Meth.B260:20-27, 2007 27 // Nucl.Instrum.Meth.B260:20-27, 2007
28 28
29 // #define MATRIX_BOUND_CHECK 29 // #define MATRIX_BOUND_CHECK
30 30
31 #include "RunAction.hh" 31 #include "RunAction.hh"
32 #include "G4AnalysisManager.hh" << 32 #include "Analysis.hh"
33 #include "G4AutoLock.hh" 33 #include "G4AutoLock.hh"
34 34
35 namespace 35 namespace
36 { 36 {
37 G4Mutex aMutex = G4MUTEX_INITIALIZER; 37 G4Mutex aMutex = G4MUTEX_INITIALIZER;
38 } 38 }
39 39
40 using namespace std; 40 using namespace std;
41 41
42 //....oooOO0OOooo........oooOO0OOooo........oo 42 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
43 43
44 RunAction::RunAction(DetectorConstruction* det 44 RunAction::RunAction(DetectorConstruction* det, PrimaryGeneratorAction* pri)
45 :fDetector(det),fPrimary(pri) 45 :fDetector(det),fPrimary(pri)
46 {} << 46 {;}
47 47
48 //....oooOO0OOooo........oooOO0OOooo........oo 48 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
49 49
50 RunAction::~RunAction() 50 RunAction::~RunAction()
51 {} 51 {}
52 52
53 //....oooOO0OOooo........oooOO0OOooo........oo 53 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
54 54
55 void RunAction::BeginOfRunAction(const G4Run* 55 void RunAction::BeginOfRunAction(const G4Run* /*aRun*/)
56 { 56 {
57 // Vector initialization 57 // Vector initialization
58 58
59 fRow=0; 59 fRow=0;
60 60
61 fXVector = CLHEP::HepVector(32); 61 fXVector = CLHEP::HepVector(32);
62 fYVector = CLHEP::HepVector(32); 62 fYVector = CLHEP::HepVector(32);
63 fThetaVector = CLHEP::HepVector(32); 63 fThetaVector = CLHEP::HepVector(32);
64 fPhiVector = CLHEP::HepVector(32); 64 fPhiVector = CLHEP::HepVector(32);
65 65
66 // Histograms << 66 // Histograms
67 67
68 // Get/create analysis manager << 68 // Get/create analysis manager
69 G4cout << "##### Create analysis manager " << 69 G4cout << "##### Create analysis manager " << " " << this << G4endl;
70 70
71 G4AnalysisManager* man = G4AnalysisManager: << 71 G4AnalysisManager* man = G4AnalysisManager::Instance();
72 man->SetDefaultFileType("root"); <<
73 72
74 G4cout << "Using " << man->GetType() << " a << 73 G4cout << "Using " << man->GetType() << " analysis manager" << G4endl;
75 74
>> 75
76 // Open an output file 76 // Open an output file
77 man->OpenFile("nanobeam"); 77 man->OpenFile("nanobeam");
78 man->SetFirstHistoId(1); 78 man->SetFirstHistoId(1);
79 man->SetFirstNtupleId(1); 79 man->SetFirstNtupleId(1);
80 80
81 // Create 1st ntuple (id = 1) 81 // Create 1st ntuple (id = 1)
>> 82 //
82 man->CreateNtuple("ntuple0", "BeamProfile") 83 man->CreateNtuple("ntuple0", "BeamProfile");
83 man->CreateNtupleDColumn("xIn"); 84 man->CreateNtupleDColumn("xIn");
84 man->CreateNtupleDColumn("yIn"); 85 man->CreateNtupleDColumn("yIn");
85 man->CreateNtupleDColumn("zIn"); 86 man->CreateNtupleDColumn("zIn");
86 man->FinishNtuple(); 87 man->FinishNtuple();
87 G4cout << "Ntuple-1 created" << G4endl; 88 G4cout << "Ntuple-1 created" << G4endl;
88 89
89 // Create 2nd htuple (id = 2) 90 // Create 2nd htuple (id = 2)
>> 91 //
90 man->CreateNtuple("ntuple1","Grid"); 92 man->CreateNtuple("ntuple1","Grid");
91 man->CreateNtupleDColumn("xIn"); 93 man->CreateNtupleDColumn("xIn");
92 man->CreateNtupleDColumn("yIn"); 94 man->CreateNtupleDColumn("yIn");
93 man->CreateNtupleDColumn("e"); 95 man->CreateNtupleDColumn("e");
94 man->FinishNtuple(); 96 man->FinishNtuple();
95 G4cout << "Ntuple-2 created" << G4endl; 97 G4cout << "Ntuple-2 created" << G4endl;
96 98
97 // Create 3rd ntuple (id = 3) 99 // Create 3rd ntuple (id = 3)
98 man->CreateNtuple("ntuple2","Coef"); 100 man->CreateNtuple("ntuple2","Coef");
99 man->CreateNtupleDColumn("xIn"); 101 man->CreateNtupleDColumn("xIn");
100 man->CreateNtupleDColumn("yIn"); 102 man->CreateNtupleDColumn("yIn");
101 man->CreateNtupleDColumn("thetaIn"); 103 man->CreateNtupleDColumn("thetaIn");
102 man->CreateNtupleDColumn("phiIn"); 104 man->CreateNtupleDColumn("phiIn");
103 man->FinishNtuple(); 105 man->FinishNtuple();
104 G4cout << "Ntuple-3 created" << G4endl; 106 G4cout << "Ntuple-3 created" << G4endl;
105 107
106 return; 108 return;
107 109
108 } 110 }
109 111
110 //....oooOO0OOooo........oooOO0OOooo........oo 112 //....oooOO0OOooo........oooOO0OOooo........oooOO0OOooo........oooOO0OOooo....
111 113
112 void RunAction::EndOfRunAction(const G4Run* /* 114 void RunAction::EndOfRunAction(const G4Run* /*aRun*/)
113 { 115 {
114 116
115 if (fDetector->GetCoef()==1) 117 if (fDetector->GetCoef()==1)
116 { 118 {
117 // 17/12/2013 - thanks to A. Dotti 119 // 17/12/2013 - thanks to A. Dotti
118 // CLHEP Matrix inversion (as for CLHEP vers 120 // CLHEP Matrix inversion (as for CLHEP version 2.1.4.1)
119 // is not thread safe, we need to prot 121 // is not thread safe, we need to protect this code.
120 // Since this is not performance criti 122 // Since this is not performance critical we simply lock
121 // all this part. 123 // all this part.
122 G4AutoLock l(&aMutex); 124 G4AutoLock l(&aMutex);
123 // 125 //
124 126
125 CLHEP::HepMatrix m; 127 CLHEP::HepMatrix m;
126 128
127 // VECTOR READING 129 // VECTOR READING
128 // VECTOR READING 130 // VECTOR READING
129 131
130 m = CLHEP::HepMatrix(32,32); 132 m = CLHEP::HepMatrix(32,32);
131 m = fPrimary->GetMatrix(); 133 m = fPrimary->GetMatrix();
132 134
133 G4cout << G4endl; 135 G4cout << G4endl;
134 G4cout << "===> NANOBEAM LINE INTRINSIC ABER 136 G4cout << "===> NANOBEAM LINE INTRINSIC ABERRATION COEFFICIENTS (units of micrometer and mrad) :" << G4endl;
135 G4cout << G4endl; 137 G4cout << G4endl;
136 138
137 int inv; 139 int inv;
138 140
139 m.invert(inv); 141 m.invert(inv);
140 CLHEP::HepVector tmp(32,0); 142 CLHEP::HepVector tmp(32,0);
141 tmp=m*fXVector; 143 tmp=m*fXVector;
142 CLHEP::HepVector b; 144 CLHEP::HepVector b;
143 b=tmp.sub(2,2); G4cout << "<x|theta>=" << 145 b=tmp.sub(2,2); G4cout << "<x|theta>=" << b << G4endl;
144 b=tmp.sub(8,8); G4cout << "<x|theta*delta> 146 b=tmp.sub(8,8); G4cout << "<x|theta*delta>=" << b << G4endl;
145 b=tmp.sub(10,10); G4cout << "<x|theta^3>=" < 147 b=tmp.sub(10,10); G4cout << "<x|theta^3>=" << b << G4endl;
146 b=tmp.sub(12,12); G4cout << "<x|theta*phi^2> 148 b=tmp.sub(12,12); G4cout << "<x|theta*phi^2>=" << b << G4endl;
147 m.invert(inv); 149 m.invert(inv);
148 150
149 m.invert(inv); 151 m.invert(inv);
150 tmp = m*fThetaVector; 152 tmp = m*fThetaVector;
151 m.invert(inv); 153 m.invert(inv);
152 b=tmp.sub(2,2); G4cout << "<x|x>=" << b << G 154 b=tmp.sub(2,2); G4cout << "<x|x>=" << b << G4endl;
153 155
154 m.invert(inv); 156 m.invert(inv);
155 tmp=m*fYVector; 157 tmp=m*fYVector;
156 b=tmp.sub(3,3); G4cout << "<y|phi>=" << b 158 b=tmp.sub(3,3); G4cout << "<y|phi>=" << b << G4endl;
157 b=tmp.sub(9,9); G4cout << "<y|phi*delta>=" 159 b=tmp.sub(9,9); G4cout << "<y|phi*delta>=" << b << G4endl;
158 b=tmp.sub(11,11); G4cout << "<y|theta^2*phi> 160 b=tmp.sub(11,11); G4cout << "<y|theta^2*phi>=" << b << G4endl;
159 b=tmp.sub(13,13); G4cout << "<y|phi^3>=" << 161 b=tmp.sub(13,13); G4cout << "<y|phi^3>=" << b << G4endl;
160 m.invert(inv); 162 m.invert(inv);
161 163
162 m.invert(inv); 164 m.invert(inv);
163 tmp = m*fPhiVector; 165 tmp = m*fPhiVector;
164 m.invert(inv); 166 m.invert(inv);
165 b=tmp.sub(3,3); G4cout << "<y|y>=" << b << G 167 b=tmp.sub(3,3); G4cout << "<y|y>=" << b << G4endl;
166 168
167 } 169 }
168 170
169 // Save histograms 171 // Save histograms
170 172
171 G4AnalysisManager* man = G4AnalysisManager::I 173 G4AnalysisManager* man = G4AnalysisManager::Instance();
172 man->Write(); 174 man->Write();
173 man->CloseFile(); 175 man->CloseFile();
174 176
175 // Complete clean-up 177 // Complete clean-up
176 man->Clear(); << 178
>> 179 delete G4AnalysisManager::Instance();
>> 180
177 } 181 }
178 182