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 // 080602 Fix memory leaks by T. Koi 26 // 080602 Fix memory leaks by T. Koi 27 // 081120 Add deltaT in signature of CalKinema 27 // 081120 Add deltaT in signature of CalKinematicsOfBinaryCollisions 28 // Add several required updating of Mea 28 // Add several required updating of Mean Filed 29 // Modified handling of absorption case 29 // Modified handling of absorption case by T. Koi 30 // 090126 Fix in absorption case by T. Koi 30 // 090126 Fix in absorption case by T. Koi 31 // 090331 Fix for gamma participant by T. Koi 31 // 090331 Fix for gamma participant by T. Koi 32 // 32 // 33 #include "G4QMDCollision.hh" 33 #include "G4QMDCollision.hh" 34 #include "G4Scatterer.hh" 34 #include "G4Scatterer.hh" 35 #include "G4Pow.hh" 35 #include "G4Pow.hh" 36 #include "G4Exp.hh" 36 #include "G4Exp.hh" 37 #include "G4Log.hh" 37 #include "G4Log.hh" 38 #include "G4PhysicalConstants.hh" 38 #include "G4PhysicalConstants.hh" 39 #include "G4SystemOfUnits.hh" 39 #include "G4SystemOfUnits.hh" 40 #include "Randomize.hh" 40 #include "Randomize.hh" 41 41 42 G4QMDCollision::G4QMDCollision() 42 G4QMDCollision::G4QMDCollision() 43 : fdeltar ( 4.0 ) 43 : fdeltar ( 4.0 ) 44 , fbcmax0 ( 1.323142 ) // NN maximum impact pa 44 , fbcmax0 ( 1.323142 ) // NN maximum impact parameter 45 , fbcmax1 ( 2.523 ) // others maximum impac 45 , fbcmax1 ( 2.523 ) // others maximum impact parameter 46 // , sig0 ( 55 ) // NN cross section 46 // , sig0 ( 55 ) // NN cross section 47 //110617 fix for gcc 4.6 compilation warnings 47 //110617 fix for gcc 4.6 compilation warnings 48 //, sig1 ( 200 ) // others cross section 48 //, sig1 ( 200 ) // others cross section 49 , fepse ( 0.0001 ) 49 , fepse ( 0.0001 ) 50 { 50 { 51 //These two pointers will be set through Se 51 //These two pointers will be set through SetMeanField method 52 theSystem=NULL; 52 theSystem=NULL; 53 theMeanField=NULL; 53 theMeanField=NULL; 54 theScatterer = new G4Scatterer(); 54 theScatterer = new G4Scatterer(); 55 } 55 } 56 56 57 /* 57 /* 58 G4QMDCollision::G4QMDCollision( const G4QMDCol 58 G4QMDCollision::G4QMDCollision( const G4QMDCollision& obj ) 59 : fdeltar ( obj.fdeltar ) 59 : fdeltar ( obj.fdeltar ) 60 , fbcmax0 ( obj.fbcmax0 ) // NN maximum impact 60 , fbcmax0 ( obj.fbcmax0 ) // NN maximum impact parameter 61 , fbcmax1 ( obj.fbcmax1 ) // others maximum 61 , fbcmax1 ( obj.fbcmax1 ) // others maximum impact parameter 62 , fepse ( obj.fepse ) 62 , fepse ( obj.fepse ) 63 { 63 { 64 64 65 if ( obj.theSystem != NULL ) { 65 if ( obj.theSystem != NULL ) { 66 theSystem = new G4QMDSystem; 66 theSystem = new G4QMDSystem; 67 *theSystem = *obj.theSystem; 67 *theSystem = *obj.theSystem; 68 } else { 68 } else { 69 theSystem = NULL; 69 theSystem = NULL; 70 } 70 } 71 if ( obj.theMeanField != NULL ) { 71 if ( obj.theMeanField != NULL ) { 72 theMeanField = new G4QMDMeanField; 72 theMeanField = new G4QMDMeanField; 73 *theMeanField = *obj.theMeanField; 73 *theMeanField = *obj.theMeanField; 74 } else { 74 } else { 75 theMeanField = NULL; 75 theMeanField = NULL; 76 } 76 } 77 theScatterer = new G4Scatterer(); 77 theScatterer = new G4Scatterer(); 78 *theScatterer = *obj.theScatterer; 78 *theScatterer = *obj.theScatterer; 79 } 79 } 80 80 81 G4QMDCollision & G4QMDCollision::operator= ( c 81 G4QMDCollision & G4QMDCollision::operator= ( const G4QMDCollision& obj) 82 { 82 { 83 fdeltar = obj.fdeltar; 83 fdeltar = obj.fdeltar; 84 fbcmax0 = obj.fbcmax1; 84 fbcmax0 = obj.fbcmax1; 85 fepse = obj.fepse; 85 fepse = obj.fepse; 86 86 87 if ( obj.theSystem != NULL ) { 87 if ( obj.theSystem != NULL ) { 88 delete theSystem; 88 delete theSystem; 89 theSystem = new G4QMDSystem; 89 theSystem = new G4QMDSystem; 90 *theSystem = *obj.theSystem; 90 *theSystem = *obj.theSystem; 91 } else { 91 } else { 92 theSystem = NULL; 92 theSystem = NULL; 93 } 93 } 94 if ( obj.theMeanField != NULL ) { 94 if ( obj.theMeanField != NULL ) { 95 delete theMeanField; 95 delete theMeanField; 96 theMeanField = new G4QMDMeanField; 96 theMeanField = new G4QMDMeanField; 97 *theMeanField = *obj.theMeanField; 97 *theMeanField = *obj.theMeanField; 98 } else { 98 } else { 99 theMeanField = NULL; 99 theMeanField = NULL; 100 } 100 } 101 delete theScatterer; 101 delete theScatterer; 102 theScatterer = new G4Scatterer(); 102 theScatterer = new G4Scatterer(); 103 *theScatterer = *obj.theScatterer; 103 *theScatterer = *obj.theScatterer; 104 104 105 return *this; 105 return *this; 106 } 106 } 107 */ 107 */ 108 108 109 109 110 G4QMDCollision::~G4QMDCollision() 110 G4QMDCollision::~G4QMDCollision() 111 { 111 { 112 //if ( theSystem != NULL ) delete theSystem 112 //if ( theSystem != NULL ) delete theSystem; 113 //if ( theMeanField != NULL ) delete theMea 113 //if ( theMeanField != NULL ) delete theMeanField; 114 delete theScatterer; 114 delete theScatterer; 115 } 115 } 116 116 117 117 118 void G4QMDCollision::CalKinematicsOfBinaryColl 118 void G4QMDCollision::CalKinematicsOfBinaryCollisions( G4double dt ) 119 { 119 { 120 G4double deltaT = dt; 120 G4double deltaT = dt; 121 121 122 G4int n = theSystem->GetTotalNumberOfPartic 122 G4int n = theSystem->GetTotalNumberOfParticipant(); 123 //081118 123 //081118 124 //G4int nb = 0; 124 //G4int nb = 0; 125 for ( G4int i = 0 ; i < n ; i++ ) 125 for ( G4int i = 0 ; i < n ; i++ ) 126 { 126 { 127 theSystem->GetParticipant( i )->UnsetHit 127 theSystem->GetParticipant( i )->UnsetHitMark(); 128 theSystem->GetParticipant( i )->UnsetHit 128 theSystem->GetParticipant( i )->UnsetHitMark(); 129 //nb += theSystem->GetParticipant( i )-> 129 //nb += theSystem->GetParticipant( i )->GetBaryonNumber(); 130 } 130 } 131 //G4cout << "nb = " << nb << " n = " << n < 131 //G4cout << "nb = " << nb << " n = " << n << G4endl; 132 132 133 133 134 //071101 134 //071101 135 for ( G4int i = 0 ; i < n ; i++ ) 135 for ( G4int i = 0 ; i < n ; i++ ) 136 { 136 { 137 137 138 //std::cout << i << " " << theSystem->Ge 138 //std::cout << i << " " << theSystem->GetParticipant( i )->GetDefinition()->GetParticleName() << " " << theSystem->GetParticipant( i )->GetPosition() << std::endl; 139 139 140 if ( theSystem->GetParticipant( i )->Get 140 if ( theSystem->GetParticipant( i )->GetDefinition()->IsShortLived() ) 141 { 141 { 142 142 143 G4bool decayed = false; 143 G4bool decayed = false; 144 144 145 const G4ParticleDefinition* pd0 = the 145 const G4ParticleDefinition* pd0 = theSystem->GetParticipant( i )->GetDefinition(); 146 G4ThreeVector p0 = theSystem->GetPart 146 G4ThreeVector p0 = theSystem->GetParticipant( i )->GetMomentum(); 147 G4ThreeVector r0 = theSystem->GetPart 147 G4ThreeVector r0 = theSystem->GetParticipant( i )->GetPosition(); 148 148 149 G4LorentzVector p40 = theSystem->GetP 149 G4LorentzVector p40 = theSystem->GetParticipant( i )->Get4Momentum(); 150 150 151 G4double eini = theMeanField->GetTota 151 G4double eini = theMeanField->GetTotalPotential() + p40.e(); 152 152 153 G4int n0 = theSystem->GetTotalNumberO 153 G4int n0 = theSystem->GetTotalNumberOfParticipant(); 154 G4int i0 = 0; 154 G4int i0 = 0; 155 155 156 G4bool isThisEnergyOK = false; 156 G4bool isThisEnergyOK = false; 157 157 158 G4int maximumNumberOfTrial=4; 158 G4int maximumNumberOfTrial=4; 159 for ( G4int ii = 0 ; ii < maximumNumb 159 for ( G4int ii = 0 ; ii < maximumNumberOfTrial ; ii++ ) 160 { 160 { 161 161 162 //G4LorentzVector p4 = theSystem-> 162 //G4LorentzVector p4 = theSystem->GetParticipant( i )->Get4Momentum(); 163 G4LorentzVector p400 = p40; 163 G4LorentzVector p400 = p40; 164 164 165 p400 *= GeV; 165 p400 *= GeV; 166 //G4KineticTrack kt( theSystem->Ge 166 //G4KineticTrack kt( theSystem->GetParticipant( i )->GetDefinition() , 0.0 , (theSystem->GetParticipant( i )->GetPosition())*fermi , p4 ); 167 G4KineticTrack kt( pd0 , 0.0 , r0* 167 G4KineticTrack kt( pd0 , 0.0 , r0*fermi , p400 ); 168 //std::cout << "G4KineticTrack " < 168 //std::cout << "G4KineticTrack " << i << " " << kt.GetDefinition()->GetParticleName() << kt.GetPosition() << std::endl; 169 G4KineticTrackVector* secs = NULL; 169 G4KineticTrackVector* secs = NULL; 170 secs = kt.Decay(); 170 secs = kt.Decay(); 171 G4int id = 0; 171 G4int id = 0; 172 G4double et = 0; 172 G4double et = 0; 173 if ( secs ) 173 if ( secs ) 174 { 174 { 175 for ( G4KineticTrackVector::ite 175 for ( G4KineticTrackVector::iterator it 176 = secs->begin() ; it != s 176 = secs->begin() ; it != secs->end() ; it++ ) 177 { 177 { 178 /* 178 /* 179 G4cout << "G4KineticTrack" 179 G4cout << "G4KineticTrack" 180 << " " << (*it)->GetDefiniti 180 << " " << (*it)->GetDefinition()->GetParticleName() 181 << " " << (*it)->Get4Momentu 181 << " " << (*it)->Get4Momentum() 182 << " " << (*it)->GetPosition 182 << " " << (*it)->GetPosition()/fermi 183 << G4endl; 183 << G4endl; 184 */ 184 */ 185 if ( id == 0 ) 185 if ( id == 0 ) 186 { 186 { 187 theSystem->GetParticipan 187 theSystem->GetParticipant( i )->SetDefinition( (*it)->GetDefinition() ); 188 theSystem->GetParticipan 188 theSystem->GetParticipant( i )->SetMomentum( (*it)->Get4Momentum().v()/GeV ); 189 theSystem->GetParticipan 189 theSystem->GetParticipant( i )->SetPosition( (*it)->GetPosition()/fermi ); 190 //theMeanField->Cal2Body 190 //theMeanField->Cal2BodyQuantities( i ); 191 et += (*it)->Get4Momentu 191 et += (*it)->Get4Momentum().e()/GeV; 192 } 192 } 193 if ( id > 0 ) 193 if ( id > 0 ) 194 { 194 { 195 // Append end; 195 // Append end; 196 theSystem->SetParticipan 196 theSystem->SetParticipant ( new G4QMDParticipant ( (*it)->GetDefinition() , (*it)->Get4Momentum().v()/GeV , (*it)->GetPosition()/fermi ) ); 197 et += (*it)->Get4Momentu 197 et += (*it)->Get4Momentum().e()/GeV; 198 if ( id > 1 ) 198 if ( id > 1 ) 199 { 199 { 200 //081118 200 //081118 201 //G4cout << "G4QMDCol 201 //G4cout << "G4QMDCollision id >2; id= " << id << G4endl; 202 } 202 } 203 } 203 } 204 id++; // number of daughter 204 id++; // number of daughter particles 205 205 206 delete *it; 206 delete *it; 207 } 207 } 208 208 209 theMeanField->Update(); 209 theMeanField->Update(); 210 i0 = id-1; // 0 enter to i 210 i0 = id-1; // 0 enter to i 211 211 212 delete secs; 212 delete secs; 213 } 213 } 214 214 215 // EnergyCheck 215 // EnergyCheck 216 216 217 G4double efin = theMeanField->GetT 217 G4double efin = theMeanField->GetTotalPotential() + et; 218 //std::cout << std::abs ( eini - 218 //std::cout << std::abs ( eini - efin ) - fepse << std::endl; 219 // std::cout << std::abs ( eini - 219 // std::cout << std::abs ( eini - efin ) - fepse*10 << std::endl; 220 // * 220 // *10 TK 221 if ( std::abs ( eini - efin ) < fe 221 if ( std::abs ( eini - efin ) < fepse*10 ) 222 { 222 { 223 // Energy OK 223 // Energy OK 224 isThisEnergyOK = true; 224 isThisEnergyOK = true; 225 break; 225 break; 226 } 226 } 227 else 227 else 228 { 228 { 229 229 230 theSystem->GetParticipant( i )- 230 theSystem->GetParticipant( i )->SetDefinition( pd0 ); 231 theSystem->GetParticipant( i )- 231 theSystem->GetParticipant( i )->SetPosition( r0 ); 232 theSystem->GetParticipant( i )- 232 theSystem->GetParticipant( i )->SetMomentum( p0 ); 233 233 234 //for ( G4int i0i = 0 ; i0i < i 234 //for ( G4int i0i = 0 ; i0i < id-1 ; i0i++ ) 235 //160210 deletion must be done 235 //160210 deletion must be done in descending order 236 for ( G4int i0i = id-2 ; 0 <= i 236 for ( G4int i0i = id-2 ; 0 <= i0i ; i0i-- ) { 237 //081118 237 //081118 238 //std::cout << "Decay Energi 238 //std::cout << "Decay Energitically Blocked deleteing " << i0i+n0 << std::endl; 239 theSystem->DeleteParticipant 239 theSystem->DeleteParticipant( i0i+n0 ); 240 } 240 } 241 //081103 241 //081103 242 theMeanField->Update(); 242 theMeanField->Update(); 243 } 243 } 244 244 245 } 245 } 246 246 247 247 248 // Pauli Check 248 // Pauli Check 249 if ( isThisEnergyOK == true ) 249 if ( isThisEnergyOK == true ) 250 { 250 { 251 if ( theMeanField->IsPauliBlocked 251 if ( theMeanField->IsPauliBlocked ( i ) != true ) 252 { 252 { 253 253 254 G4bool allOK = true; 254 G4bool allOK = true; 255 for ( G4int i0i = 0 ; i0i < i0 255 for ( G4int i0i = 0 ; i0i < i0 ; i0i++ ) 256 { 256 { 257 if ( theMeanField->IsPauliBl 257 if ( theMeanField->IsPauliBlocked ( i0i+n0 ) == true ) 258 { 258 { 259 allOK = false; 259 allOK = false; 260 break; 260 break; 261 } 261 } 262 } 262 } 263 263 264 if ( allOK ) 264 if ( allOK ) 265 { 265 { 266 decayed = true; //Decay Succ 266 decayed = true; //Decay Succeeded 267 } 267 } 268 } 268 } 269 269 270 } 270 } 271 // 271 // 272 272 273 if ( decayed ) 273 if ( decayed ) 274 { 274 { 275 //081119 275 //081119 276 //G4cout << "Decay Suceeded! " << 276 //G4cout << "Decay Suceeded! " << std::endl; 277 theSystem->GetParticipant( i )->Se 277 theSystem->GetParticipant( i )->SetHitMark(); 278 for ( G4int i0i = 0 ; i0i < i0 ; i 278 for ( G4int i0i = 0 ; i0i < i0 ; i0i++ ) 279 { 279 { 280 theSystem->GetParticipant( i0i 280 theSystem->GetParticipant( i0i+n0 )->SetHitMark(); 281 } 281 } 282 282 283 } 283 } 284 else 284 else 285 { 285 { 286 286 287 // Decay Blocked and re-enter orginal 287 // Decay Blocked and re-enter orginal participant; 288 288 289 if ( isThisEnergyOK == true ) // 289 if ( isThisEnergyOK == true ) // for false case already done 290 { 290 { 291 291 292 theSystem->GetParticipant( i )- 292 theSystem->GetParticipant( i )->SetDefinition( pd0 ); 293 theSystem->GetParticipant( i )- 293 theSystem->GetParticipant( i )->SetPosition( r0 ); 294 theSystem->GetParticipant( i )- 294 theSystem->GetParticipant( i )->SetMomentum( p0 ); 295 295 296 for ( G4int i0i = 0 ; i0i < i0 296 for ( G4int i0i = 0 ; i0i < i0 ; i0i++ ) 297 { 297 { 298 //081118 298 //081118 299 //std::cout << "Decay Blocke 299 //std::cout << "Decay Blocked deleteing " << i0i+n0 << std::endl; 300 //160210 adding commnet: del 300 //160210 adding commnet: deletion must be done in descending order 301 theSystem->DeleteParticipant 301 theSystem->DeleteParticipant( i0+n0-i0i-1 ); 302 } 302 } 303 //081103 303 //081103 304 theMeanField->Update(); 304 theMeanField->Update(); 305 } 305 } 306 306 307 } 307 } 308 308 309 } //shortlive 309 } //shortlive 310 } // go next participant 310 } // go next participant 311 //071101 311 //071101 312 312 313 313 314 n = theSystem->GetTotalNumberOfParticipant( 314 n = theSystem->GetTotalNumberOfParticipant(); 315 315 316 //081118 316 //081118 317 //for ( G4int i = 1 ; i < n ; i++ ) 317 //for ( G4int i = 1 ; i < n ; i++ ) 318 for ( G4int i = 1 ; i < theSystem->GetTotal 318 for ( G4int i = 1 ; i < theSystem->GetTotalNumberOfParticipant() ; i++ ) 319 { 319 { 320 320 321 //std::cout << "Collision i " << i << st 321 //std::cout << "Collision i " << i << std::endl; 322 if ( theSystem->GetParticipant( i )->IsT 322 if ( theSystem->GetParticipant( i )->IsThisHit() ) continue; 323 323 324 G4ThreeVector ri = theSystem->GetPartic 324 G4ThreeVector ri = theSystem->GetParticipant( i )->GetPosition(); 325 G4LorentzVector p4i = theSystem->GetPar 325 G4LorentzVector p4i = theSystem->GetParticipant( i )->Get4Momentum(); 326 G4double rmi = theSystem->GetParticipan 326 G4double rmi = theSystem->GetParticipant( i )->GetMass(); 327 const G4ParticleDefinition* pdi = theSy 327 const G4ParticleDefinition* pdi = theSystem->GetParticipant( i )->GetDefinition(); 328 //090331 gamma 328 //090331 gamma 329 if ( pdi->GetPDGMass() == 0.0 ) continue 329 if ( pdi->GetPDGMass() == 0.0 ) continue; 330 330 331 //std::cout << " p4i00 " << p4i << std:: 331 //std::cout << " p4i00 " << p4i << std::endl; 332 for ( G4int j = 0 ; j < i ; j++ ) 332 for ( G4int j = 0 ; j < i ; j++ ) 333 { 333 { 334 334 335 335 336 /* 336 /* 337 G4cout << "Collision " << i << " " << 337 G4cout << "Collision " << i << " " << theSystem->GetParticipant( i )->IsThisProjectile() << G4endl; 338 G4cout << "Collision " << j << " " << 338 G4cout << "Collision " << j << " " << theSystem->GetParticipant( j )->IsThisProjectile() << G4endl; 339 G4cout << "Collision " << i << " " << 339 G4cout << "Collision " << i << " " << theSystem->GetParticipant( i )->IsThisTarget() << G4endl; 340 G4cout << "Collision " << j << " " << 340 G4cout << "Collision " << j << " " << theSystem->GetParticipant( j )->IsThisTarget() << G4endl; 341 */ 341 */ 342 342 343 // Only 1 Collision allowed for each 343 // Only 1 Collision allowed for each particle in a time step. 344 //081119 344 //081119 345 if ( theSystem->GetParticipant( i )-> 345 if ( theSystem->GetParticipant( i )->IsThisHit() ) continue; 346 if ( theSystem->GetParticipant( j )-> 346 if ( theSystem->GetParticipant( j )->IsThisHit() ) continue; 347 347 348 //std::cout << "Collision " << i << " 348 //std::cout << "Collision " << i << " " << j << std::endl; 349 349 350 // Do not allow collision between nuc 350 // Do not allow collision between nucleons in target/projectile til its first collision. 351 if ( theSystem->GetParticipant( i )-> 351 if ( theSystem->GetParticipant( i )->IsThisProjectile() ) 352 { 352 { 353 if ( theSystem->GetParticipant( j 353 if ( theSystem->GetParticipant( j )->IsThisProjectile() ) continue; 354 } 354 } 355 else if ( theSystem->GetParticipant( 355 else if ( theSystem->GetParticipant( i )->IsThisTarget() ) 356 { 356 { 357 if ( theSystem->GetParticipant( j 357 if ( theSystem->GetParticipant( j )->IsThisTarget() ) continue; 358 } 358 } 359 359 360 360 361 G4ThreeVector rj = theSystem->GetPar 361 G4ThreeVector rj = theSystem->GetParticipant( j )->GetPosition(); 362 G4LorentzVector p4j = theSystem->Get 362 G4LorentzVector p4j = theSystem->GetParticipant( j )->Get4Momentum(); 363 G4double rmj = theSystem->GetPartici 363 G4double rmj = theSystem->GetParticipant( j )->GetMass(); 364 const G4ParticleDefinition* pdj = th 364 const G4ParticleDefinition* pdj = theSystem->GetParticipant( j )->GetDefinition(); 365 //090331 gamma 365 //090331 gamma 366 if ( pdj->GetPDGMass() == 0.0 ) conti 366 if ( pdj->GetPDGMass() == 0.0 ) continue; 367 367 368 G4double rr2 = theMeanField->GetRR2( 368 G4double rr2 = theMeanField->GetRR2( i , j ); 369 369 370 // Here we assume elab (beam momentum le 370 // Here we assume elab (beam momentum less than 5 GeV/n ) 371 if ( rr2 > fdeltar*fdeltar ) continue 371 if ( rr2 > fdeltar*fdeltar ) continue; 372 372 373 //G4double s = (p4i+p4j)*(p4i+p4j); 373 //G4double s = (p4i+p4j)*(p4i+p4j); 374 //G4double srt = std::sqrt ( s ); 374 //G4double srt = std::sqrt ( s ); 375 375 376 G4double srt = std::sqrt( (p4i+p4j)*( 376 G4double srt = std::sqrt( (p4i+p4j)*(p4i+p4j) ); 377 377 378 G4double cutoff = 0.0; 378 G4double cutoff = 0.0; 379 G4double fbcmax = 0.0; 379 G4double fbcmax = 0.0; 380 //110617 fix for gcc 4.6 compilation 380 //110617 fix for gcc 4.6 compilation warnings 381 //G4double sig = 0.0; 381 //G4double sig = 0.0; 382 382 383 if ( rmi < 0.94 && rmj < 0.94 ) 383 if ( rmi < 0.94 && rmj < 0.94 ) 384 { 384 { 385 // nucleon or pion case 385 // nucleon or pion case 386 cutoff = rmi + rmj + 0.02; 386 cutoff = rmi + rmj + 0.02; 387 fbcmax = fbcmax0; 387 fbcmax = fbcmax0; 388 //110617 fix for gcc 4.6 compilati 388 //110617 fix for gcc 4.6 compilation warnings 389 //sig = sig0; 389 //sig = sig0; 390 } 390 } 391 else 391 else 392 { 392 { 393 cutoff = rmi + rmj; 393 cutoff = rmi + rmj; 394 fbcmax = fbcmax1; 394 fbcmax = fbcmax1; 395 //110617 fix for gcc compilation w 395 //110617 fix for gcc compilation warnings 396 //sig = sig1; 396 //sig = sig1; 397 } 397 } 398 398 399 //std::cout << "Collision cutoff " << 399 //std::cout << "Collision cutoff " << i << " " << j << " " << cutoff << std::endl; 400 if ( srt < cutoff ) continue; 400 if ( srt < cutoff ) continue; 401 401 402 G4ThreeVector dr = ri - rj; 402 G4ThreeVector dr = ri - rj; 403 G4double rsq = dr*dr; 403 G4double rsq = dr*dr; 404 404 405 G4double pij = p4i*p4j; 405 G4double pij = p4i*p4j; 406 G4double pidr = p4i.vect()*dr; 406 G4double pidr = p4i.vect()*dr; 407 G4double pjdr = p4j.vect()*dr; 407 G4double pjdr = p4j.vect()*dr; 408 408 409 G4double aij = 1.0 - ( rmi*rmj /pij ) 409 G4double aij = 1.0 - ( rmi*rmj /pij ) * ( rmi*rmj /pij ); 410 G4double bij = pidr / rmi - pjdr*rmi/ 410 G4double bij = pidr / rmi - pjdr*rmi/pij; 411 G4double cij = rsq + ( pidr / rmi ) * 411 G4double cij = rsq + ( pidr / rmi ) * ( pidr / rmi ); 412 G4double brel = std::sqrt ( std::abs 412 G4double brel = std::sqrt ( std::abs ( cij - bij*bij/aij ) ); 413 413 414 if ( brel > fbcmax ) continue; 414 if ( brel > fbcmax ) continue; 415 //std::cout << "collisions3 " << std: 415 //std::cout << "collisions3 " << std::endl; 416 416 417 G4double bji = -pjdr/rmj + pidr * rmj 417 G4double bji = -pjdr/rmj + pidr * rmj /pij; 418 418 419 G4double ti = ( pidr/rmi - bij / aij 419 G4double ti = ( pidr/rmi - bij / aij ) * p4i.e() / rmi; 420 G4double tj = (-pjdr/rmj - bji / aij 420 G4double tj = (-pjdr/rmj - bji / aij ) * p4j.e() / rmj; 421 421 422 422 423 /* 423 /* 424 G4cout << "collisions4 p4i " << p4i 424 G4cout << "collisions4 p4i " << p4i << G4endl; 425 G4cout << "collisions4 ri " << ri << 425 G4cout << "collisions4 ri " << ri << G4endl; 426 G4cout << "collisions4 p4j " << p4j 426 G4cout << "collisions4 p4j " << p4j << G4endl; 427 G4cout << "collisions4 rj " << rj << 427 G4cout << "collisions4 rj " << rj << G4endl; 428 G4cout << "collisions4 dr " << dr << 428 G4cout << "collisions4 dr " << dr << G4endl; 429 G4cout << "collisions4 pij " << pij 429 G4cout << "collisions4 pij " << pij << G4endl; 430 G4cout << "collisions4 aij " << aij 430 G4cout << "collisions4 aij " << aij << G4endl; 431 G4cout << "collisions4 bij bji " << 431 G4cout << "collisions4 bij bji " << bij << " " << bji << G4endl; 432 G4cout << "collisions4 pidr pjdr " < 432 G4cout << "collisions4 pidr pjdr " << pidr << " " << pjdr << G4endl; 433 G4cout << "collisions4 p4i.e() p4j.e 433 G4cout << "collisions4 p4i.e() p4j.e() " << p4i.e() << " " << p4j.e() << G4endl; 434 G4cout << "collisions4 rmi rmj " << 434 G4cout << "collisions4 rmi rmj " << rmi << " " << rmj << G4endl; 435 G4cout << "collisions4 " << ti << " " 435 G4cout << "collisions4 " << ti << " " << tj << G4endl; 436 */ 436 */ 437 if ( std::abs ( ti + tj ) > deltaT ) 437 if ( std::abs ( ti + tj ) > deltaT ) continue; 438 //std::cout << "collisions4 " << std: 438 //std::cout << "collisions4 " << std::endl; 439 439 440 G4ThreeVector beta = ( p4i + p4j ).bo 440 G4ThreeVector beta = ( p4i + p4j ).boostVector(); 441 441 442 G4LorentzVector p = p4i; 442 G4LorentzVector p = p4i; 443 G4LorentzVector p4icm = p.boost( p.fi 443 G4LorentzVector p4icm = p.boost( p.findBoostToCM ( p4j ) ); 444 G4ThreeVector pcm = p4icm.vect(); 444 G4ThreeVector pcm = p4icm.vect(); 445 445 446 G4double prcm = pcm.mag(); 446 G4double prcm = pcm.mag(); 447 447 448 if ( prcm <= 0.00001 ) continue; 448 if ( prcm <= 0.00001 ) continue; 449 //std::cout << "collisions5 " << std: 449 //std::cout << "collisions5 " << std::endl; 450 450 451 G4bool energetically_forbidden = !( C 451 G4bool energetically_forbidden = !( CalFinalStateOfTheBinaryCollision ( i , j ) ); // Use Geant4 Collision Library 452 //G4bool energetically_forbidden = !( 452 //G4bool energetically_forbidden = !( CalFinalStateOfTheBinaryCollisionJQMD ( sig , cutoff , pcm , prcm , srt, beta , gamma , i , j ) ); // JQMD Elastic 453 453 454 /* 454 /* 455 G4bool pauli_blocked = false; 455 G4bool pauli_blocked = false; 456 if ( energetically_forbidden == false 456 if ( energetically_forbidden == false ) // result true 457 { 457 { 458 if ( theMeanField->IsPauliBlocked 458 if ( theMeanField->IsPauliBlocked ( i ) == true || theMeanField->IsPauliBlocked ( j ) == true ) 459 { 459 { 460 pauli_blocked = true; 460 pauli_blocked = true; 461 //std::cout << "G4QMDRESULT Col 461 //std::cout << "G4QMDRESULT Collsion Pauli Blocked " << std::endl; 462 } 462 } 463 } 463 } 464 else 464 else 465 { 465 { 466 if ( theMeanField->IsPauliBlocked 466 if ( theMeanField->IsPauliBlocked ( i ) == true || theMeanField->IsPauliBlocked ( j ) == true ) 467 pauli_blocked = false; 467 pauli_blocked = false; 468 //std::cout << "G4QMDRESULT Collsi 468 //std::cout << "G4QMDRESULT Collsion Blocked " << std::endl; 469 } 469 } 470 */ 470 */ 471 471 472 /* 472 /* 473 G4cout << "G4QMDRESULT Collsion in 473 G4cout << "G4QMDRESULT Collsion initial p4 i and j " 474 << p4i << " " << p4j 474 << p4i << " " << p4j 475 << G4endl; 475 << G4endl; 476 */ 476 */ 477 // 081118 477 // 081118 478 //if ( energetically_forbidden == tru 478 //if ( energetically_forbidden == true || pauli_blocked == true ) 479 if ( energetically_forbidden == true 479 if ( energetically_forbidden == true ) 480 { 480 { 481 481 482 //G4cout << " energetically_forbid 482 //G4cout << " energetically_forbidden " << G4endl; 483 // Collsion not allowed then re enter 483 // Collsion not allowed then re enter orginal participants 484 // Now only momentum, becasuse we onl 484 // Now only momentum, becasuse we only consider elastic scattering of nucleons 485 485 486 theSystem->GetParticipant( i )->Se 486 theSystem->GetParticipant( i )->SetMomentum( p4i.vect() ); 487 theSystem->GetParticipant( i )->Se 487 theSystem->GetParticipant( i )->SetDefinition( pdi ); 488 theSystem->GetParticipant( i )->Se 488 theSystem->GetParticipant( i )->SetPosition( ri ); 489 489 490 theSystem->GetParticipant( j )->Se 490 theSystem->GetParticipant( j )->SetMomentum( p4j.vect() ); 491 theSystem->GetParticipant( j )->Se 491 theSystem->GetParticipant( j )->SetDefinition( pdj ); 492 theSystem->GetParticipant( j )->Se 492 theSystem->GetParticipant( j )->SetPosition( rj ); 493 493 494 theMeanField->Cal2BodyQuantities( 494 theMeanField->Cal2BodyQuantities( i ); 495 theMeanField->Cal2BodyQuantities( 495 theMeanField->Cal2BodyQuantities( j ); 496 496 497 } 497 } 498 else 498 else 499 { 499 { 500 500 501 501 502 G4bool absorption = false; 502 G4bool absorption = false; 503 if ( n == theSystem->GetTotalNumber 503 if ( n == theSystem->GetTotalNumberOfParticipant()+1 ) absorption = true; 504 if ( absorption ) 504 if ( absorption ) 505 { 505 { 506 //G4cout << "Absorption happend 506 //G4cout << "Absorption happend " << G4endl; 507 i = i-1; 507 i = i-1; 508 n = n-1; 508 n = n-1; 509 } 509 } 510 510 511 // Collsion allowed (really happened) 511 // Collsion allowed (really happened) 512 512 513 // Unset Projectile/Target flag 513 // Unset Projectile/Target flag 514 theSystem->GetParticipant( i )->Un 514 theSystem->GetParticipant( i )->UnsetInitialMark(); 515 if ( !absorption ) theSystem->GetP 515 if ( !absorption ) theSystem->GetParticipant( j )->UnsetInitialMark(); 516 516 517 theSystem->GetParticipant( i )->Se 517 theSystem->GetParticipant( i )->SetHitMark(); 518 if ( !absorption ) theSystem->GetP 518 if ( !absorption ) theSystem->GetParticipant( j )->SetHitMark(); 519 519 520 theSystem->IncrementCollisionCount 520 theSystem->IncrementCollisionCounter(); 521 521 522 /* 522 /* 523 G4cout << "G4QMDRESULT Collsion Re 523 G4cout << "G4QMDRESULT Collsion Really Happened between " 524 << i << " and " << j 524 << i << " and " << j 525 << G4endl; 525 << G4endl; 526 G4cout << "G4QMDRESULT Collsion in 526 G4cout << "G4QMDRESULT Collsion initial p4 i and j " 527 << p4i << " " << p4j 527 << p4i << " " << p4j 528 << G4endl; 528 << G4endl; 529 G4cout << "G4QMDRESULT Collsion af 529 G4cout << "G4QMDRESULT Collsion after p4 i and j " 530 << theSystem->GetPartici 530 << theSystem->GetParticipant( i )->Get4Momentum() 531 << " " 531 << " " 532 << theSystem->GetPartici 532 << theSystem->GetParticipant( j )->Get4Momentum() 533 << G4endl; 533 << G4endl; 534 G4cout << "G4QMDRESULT Collsion Di 534 G4cout << "G4QMDRESULT Collsion Diff " 535 << p4i + p4j - theSystem 535 << p4i + p4j - theSystem->GetParticipant( i )->Get4Momentum() - theSystem->GetParticipant( j )->Get4Momentum() 536 << G4endl; 536 << G4endl; 537 G4cout << "G4QMDRESULT Collsion in 537 G4cout << "G4QMDRESULT Collsion initial r i and j " 538 << ri << " " << rj 538 << ri << " " << rj 539 << G4endl; 539 << G4endl; 540 G4cout << "G4QMDRESULT Collsion af 540 G4cout << "G4QMDRESULT Collsion after r i and j " 541 << theSystem->GetPartici 541 << theSystem->GetParticipant( i )->GetPosition() 542 << " " 542 << " " 543 << theSystem->GetPartici 543 << theSystem->GetParticipant( j )->GetPosition() 544 << G4endl; 544 << G4endl; 545 */ 545 */ 546 546 547 547 548 } 548 } 549 549 550 } 550 } 551 551 552 } 552 } 553 553 554 554 555 } 555 } 556 556 557 557 558 558 559 G4bool G4QMDCollision::CalFinalStateOfTheBinar 559 G4bool G4QMDCollision::CalFinalStateOfTheBinaryCollision( G4int i , G4int j ) 560 { 560 { 561 561 562 //081103 562 //081103 563 //G4cout << "CalFinalStateOfTheBinaryCollis 563 //G4cout << "CalFinalStateOfTheBinaryCollision " << i << " " << j << " " << theSystem->GetTotalNumberOfParticipant() << G4endl; 564 564 565 G4bool result = false; 565 G4bool result = false; 566 G4bool energyOK = false; 566 G4bool energyOK = false; 567 G4bool pauliOK = false; 567 G4bool pauliOK = false; 568 G4bool abs = false; 568 G4bool abs = false; 569 G4QMDParticipant* absorbed = NULL; 569 G4QMDParticipant* absorbed = NULL; 570 570 571 G4LorentzVector p4i = theSystem->GetPartici 571 G4LorentzVector p4i = theSystem->GetParticipant( i )->Get4Momentum(); 572 G4LorentzVector p4j = theSystem->GetPartici 572 G4LorentzVector p4j = theSystem->GetParticipant( j )->Get4Momentum(); 573 573 574 //071031 574 //071031 575 575 576 G4double epot = theMeanField->GetTotalPoten 576 G4double epot = theMeanField->GetTotalPotential(); 577 577 578 G4double eini = epot + p4i.e() + p4j.e(); 578 G4double eini = epot + p4i.e() + p4j.e(); 579 579 580 //071031 580 //071031 581 // will use KineticTrack 581 // will use KineticTrack 582 const G4ParticleDefinition* pdi0 =theSystem 582 const G4ParticleDefinition* pdi0 =theSystem->GetParticipant( i )->GetDefinition(); 583 const G4ParticleDefinition* pdj0 =theSystem 583 const G4ParticleDefinition* pdj0 =theSystem->GetParticipant( j )->GetDefinition(); 584 G4LorentzVector p4i0 = p4i*GeV; 584 G4LorentzVector p4i0 = p4i*GeV; 585 G4LorentzVector p4j0 = p4j*GeV; 585 G4LorentzVector p4j0 = p4j*GeV; 586 G4ThreeVector ri0 = ( theSystem->GetPartici 586 G4ThreeVector ri0 = ( theSystem->GetParticipant( i )->GetPosition() )*fermi; 587 G4ThreeVector rj0 = ( theSystem->GetPartici 587 G4ThreeVector rj0 = ( theSystem->GetParticipant( j )->GetPosition() )*fermi; 588 588 589 for ( G4int iitry = 0 ; iitry < 4 ; iitry++ 589 for ( G4int iitry = 0 ; iitry < 4 ; iitry++ ) 590 { 590 { 591 591 592 abs = false; 592 abs = false; 593 593 594 G4KineticTrack kt1( pdi0 , 0.0 , ri0 , p 594 G4KineticTrack kt1( pdi0 , 0.0 , ri0 , p4i0 ); 595 G4KineticTrack kt2( pdj0 , 0.0 , rj0 , p 595 G4KineticTrack kt2( pdj0 , 0.0 , rj0 , p4j0 ); 596 596 597 G4LorentzVector p4ix_new; 597 G4LorentzVector p4ix_new; 598 G4LorentzVector p4jx_new; 598 G4LorentzVector p4jx_new; 599 G4KineticTrackVector* secs = NULL; 599 G4KineticTrackVector* secs = NULL; 600 secs = theScatterer->Scatter( kt1 , kt2 600 secs = theScatterer->Scatter( kt1 , kt2 ); 601 601 602 //std::cout << "G4QMDSCATTERER BEFORE " 602 //std::cout << "G4QMDSCATTERER BEFORE " << kt1.GetDefinition()->GetParticleName() << " " << kt1.Get4Momentum()/GeV << " " << kt1.GetPosition()/fermi << std::endl; 603 //std::cout << "G4QMDSCATTERER BEFORE " 603 //std::cout << "G4QMDSCATTERER BEFORE " << kt2.GetDefinition()->GetParticleName() << " " << kt2.Get4Momentum()/GeV << " " << kt2.GetPosition()/fermi << std::endl; 604 //std::cout << "THESCATTERER " << theSca 604 //std::cout << "THESCATTERER " << theScatterer->GetCrossSection ( kt1 , kt2 )/millibarn << " " << elastic << " " << sig << std::endl; 605 605 606 606 607 if ( secs ) 607 if ( secs ) 608 { 608 { 609 G4int iti = 0; 609 G4int iti = 0; 610 if ( secs->size() == 2 ) 610 if ( secs->size() == 2 ) 611 { 611 { 612 for ( G4KineticTrackVector::iterat 612 for ( G4KineticTrackVector::iterator it 613 = secs->begin() ; it != secs-> 613 = secs->begin() ; it != secs->end() ; it++ ) 614 { 614 { 615 if ( iti == 0 ) 615 if ( iti == 0 ) 616 { 616 { 617 theSystem->GetParticipant( i 617 theSystem->GetParticipant( i )->SetDefinition( (*it)->GetDefinition() ); 618 p4ix_new = (*it)->Get4Moment 618 p4ix_new = (*it)->Get4Momentum()/GeV; 619 //std::cout << "THESCATTERER 619 //std::cout << "THESCATTERER " << (*it)->GetDefinition()->GetParticleName() << std::endl; 620 theSystem->GetParticipant( i 620 theSystem->GetParticipant( i )->SetMomentum( p4ix_new.v() ); 621 } 621 } 622 if ( iti == 1 ) 622 if ( iti == 1 ) 623 { 623 { 624 theSystem->GetParticipant( j 624 theSystem->GetParticipant( j )->SetDefinition( (*it)->GetDefinition() ); 625 p4jx_new = (*it)->Get4Moment 625 p4jx_new = (*it)->Get4Momentum()/GeV; 626 //std::cout << "THESCATTERER 626 //std::cout << "THESCATTERER " << p4jx_new.e()-p4jx_new.m() << std::endl; 627 theSystem->GetParticipant( j 627 theSystem->GetParticipant( j )->SetMomentum( p4jx_new.v() ); 628 } 628 } 629 //std::cout << "G4QMDSCATTERER 629 //std::cout << "G4QMDSCATTERER AFTER " << (*it)->GetDefinition()->GetParticleName() << " " << (*it)->Get4Momentum()/GeV << std::endl; 630 iti++; 630 iti++; 631 } 631 } 632 } 632 } 633 else if ( secs->size() == 1 ) 633 else if ( secs->size() == 1 ) 634 { 634 { 635 //081118 635 //081118 636 abs = true; 636 abs = true; 637 //G4cout << "G4QMDCollision pion a 637 //G4cout << "G4QMDCollision pion absrorption " << secs->front()->GetDefinition()->GetParticleName() << G4endl; 638 //secs->front()->Decay(); 638 //secs->front()->Decay(); 639 theSystem->GetParticipant( i )->Se 639 theSystem->GetParticipant( i )->SetDefinition( secs->front()->GetDefinition() ); 640 p4ix_new = secs->front()->Get4Mome 640 p4ix_new = secs->front()->Get4Momentum()/GeV; 641 theSystem->GetParticipant( i )->Se 641 theSystem->GetParticipant( i )->SetMomentum( p4ix_new.v() ); 642 642 643 } 643 } 644 644 645 //081118 645 //081118 646 if ( secs->size() > 2 ) 646 if ( secs->size() > 2 ) 647 { 647 { 648 648 649 G4cout << "G4QMDCollision secs siz 649 G4cout << "G4QMDCollision secs size > 2; " << secs->size() << G4endl; 650 650 651 for ( G4KineticTrackVector::iterat 651 for ( G4KineticTrackVector::iterator it 652 = secs->begin() ; it != secs-> 652 = secs->begin() ; it != secs->end() ; it++ ) 653 { 653 { 654 G4cout << "G4QMDSCATTERER AFTER 654 G4cout << "G4QMDSCATTERER AFTER " << (*it)->GetDefinition()->GetParticleName() << " " << (*it)->Get4Momentum()/GeV << G4endl; 655 } 655 } 656 656 657 } 657 } 658 658 659 // deleteing KineticTrack 659 // deleteing KineticTrack 660 for ( G4KineticTrackVector::iterator 660 for ( G4KineticTrackVector::iterator it 661 = secs->begin() ; it != secs->e 661 = secs->begin() ; it != secs->end() ; it++ ) 662 { 662 { 663 delete *it; 663 delete *it; 664 } 664 } 665 665 666 delete secs; 666 delete secs; 667 } 667 } 668 //071031 668 //071031 669 669 670 if ( !abs ) 670 if ( !abs ) 671 { 671 { 672 theMeanField->Cal2BodyQuantities( i ) 672 theMeanField->Cal2BodyQuantities( i ); 673 theMeanField->Cal2BodyQuantities( j ) 673 theMeanField->Cal2BodyQuantities( j ); 674 } 674 } 675 else 675 else 676 { 676 { 677 absorbed = theSystem->EraseParticipan 677 absorbed = theSystem->EraseParticipant( j ); 678 theMeanField->Update(); 678 theMeanField->Update(); 679 } 679 } 680 680 681 epot = theMeanField->GetTotalPotential() 681 epot = theMeanField->GetTotalPotential(); 682 682 683 G4double efin = epot + p4ix_new.e() + p4 683 G4double efin = epot + p4ix_new.e() + p4jx_new.e(); 684 684 685 //std::cout << "Collision NEW epot " << 685 //std::cout << "Collision NEW epot " << i << " " << j << " " << epot << " " << std::abs ( eini - efin ) - fepse << std::endl; 686 686 687 /* 687 /* 688 G4cout << "Collision efin " << i << " " 688 G4cout << "Collision efin " << i << " " << j << " " << efin << G4endl; 689 G4cout << "Collision " << i << " " << j 689 G4cout << "Collision " << i << " " << j << " " << std::abs ( eini - efin ) << " " << fepse << G4endl; 690 G4cout << "Collision " << std::abs ( ein 690 G4cout << "Collision " << std::abs ( eini - efin ) << " " << fepse << G4endl; 691 */ 691 */ 692 692 693 //071031 693 //071031 694 if ( std::abs ( eini - efin ) < fepse ) 694 if ( std::abs ( eini - efin ) < fepse ) 695 { 695 { 696 // Collison OK 696 // Collison OK 697 //std::cout << "collisions6" << std:: 697 //std::cout << "collisions6" << std::endl; 698 //std::cout << "collisions before " < 698 //std::cout << "collisions before " << p4i << " " << p4j << std::endl; 699 //std::cout << "collisions after " << 699 //std::cout << "collisions after " << theSystem->GetParticipant( i )->Get4Momentum() << " " << theSystem->GetParticipant( j )->Get4Momentum() << std::endl; 700 //std::cout << "collisions dif " << ( 700 //std::cout << "collisions dif " << ( p4i + p4j ) - ( theSystem->GetParticipant( i )->Get4Momentum() + theSystem->GetParticipant( j )->Get4Momentum() ) << std::endl; 701 //std::cout << "collisions before " < 701 //std::cout << "collisions before " << ri0/fermi << " " << rj0/fermi << std::endl; 702 //std::cout << "collisions after " << 702 //std::cout << "collisions after " << theSystem->GetParticipant( i )->GetPosition() << " " << theSystem->GetParticipant( j )->GetPosition() << std::endl; 703 energyOK = true; 703 energyOK = true; 704 break; 704 break; 705 } 705 } 706 else 706 else 707 { 707 { 708 //G4cout << "Energy Not OK " << G4end 708 //G4cout << "Energy Not OK " << G4endl; 709 if ( abs ) 709 if ( abs ) 710 { 710 { 711 //G4cout << "TKDB reinsert j " << 711 //G4cout << "TKDB reinsert j " << G4endl; 712 theSystem->InsertParticipant( abso 712 theSystem->InsertParticipant( absorbed , j ); 713 theMeanField->Update(); 713 theMeanField->Update(); 714 } 714 } 715 // do not need reinsert in no absropt 715 // do not need reinsert in no absroption case 716 } 716 } 717 //071031 717 //071031 718 } 718 } 719 719 720 // Energetically forbidden collision 720 // Energetically forbidden collision 721 721 722 if ( energyOK ) 722 if ( energyOK ) 723 { 723 { 724 // Pauli Check 724 // Pauli Check 725 //G4cout << "Pauli Checking " << theSyst 725 //G4cout << "Pauli Checking " << theSystem->GetTotalNumberOfParticipant() << G4endl; 726 if ( !abs ) 726 if ( !abs ) 727 { 727 { 728 if ( !( theMeanField->IsPauliBlocked 728 if ( !( theMeanField->IsPauliBlocked ( i ) == true || theMeanField->IsPauliBlocked ( j ) == true ) ) 729 { 729 { 730 //G4cout << "Binary Collision Happ 730 //G4cout << "Binary Collision Happen " << theSystem->GetTotalNumberOfParticipant() << G4endl; 731 pauliOK = true; 731 pauliOK = true; 732 } 732 } 733 } 733 } 734 else 734 else 735 { 735 { 736 //if ( theMeanField->IsPauliBlocked ( 736 //if ( theMeanField->IsPauliBlocked ( i ) == false ) 737 //090126 i 737 //090126 i-1 cause jth is erased 738 if ( theMeanField->IsPauliBlocked ( i 738 if ( theMeanField->IsPauliBlocked ( i-1 ) == false ) 739 { 739 { 740 //G4cout << "Absorption Happen " < 740 //G4cout << "Absorption Happen " << theSystem->GetTotalNumberOfParticipant() << G4endl; 741 delete absorbed; 741 delete absorbed; 742 pauliOK = true; 742 pauliOK = true; 743 } 743 } 744 } 744 } 745 745 746 746 747 if ( pauliOK ) 747 if ( pauliOK ) 748 { 748 { 749 result = true; 749 result = true; 750 } 750 } 751 else 751 else 752 { 752 { 753 //G4cout << "Pauli Blocked" << G4endl 753 //G4cout << "Pauli Blocked" << G4endl; 754 if ( abs ) 754 if ( abs ) 755 { 755 { 756 //G4cout << "TKDB reinsert j pauli 756 //G4cout << "TKDB reinsert j pauli block" << G4endl; 757 theSystem->InsertParticipant( abso 757 theSystem->InsertParticipant( absorbed , j ); 758 theMeanField->Update(); 758 theMeanField->Update(); 759 } 759 } 760 } 760 } 761 } 761 } 762 762 763 return result; 763 return result; 764 764 765 } 765 } 766 766 767 767 768 768 769 G4bool G4QMDCollision::CalFinalStateOfTheBinar 769 G4bool G4QMDCollision::CalFinalStateOfTheBinaryCollisionJQMD( G4double sig , G4double cutoff , G4ThreeVector pcm , G4double prcm , G4double srt , G4ThreeVector beta , G4double gamma , G4int i , G4int j ) 770 { 770 { 771 771 772 //G4cout << "CalFinalStateOfTheBinaryCollis 772 //G4cout << "CalFinalStateOfTheBinaryCollisionJQMD" << G4endl; 773 773 774 G4bool result = true; 774 G4bool result = true; 775 775 776 G4LorentzVector p4i = theSystem->GetPartic 776 G4LorentzVector p4i = theSystem->GetParticipant( i )->Get4Momentum(); 777 G4double rmi = theSystem->GetParticipant( 777 G4double rmi = theSystem->GetParticipant( i )->GetMass(); 778 G4int zi = theSystem->GetParticipant( i )- 778 G4int zi = theSystem->GetParticipant( i )->GetChargeInUnitOfEplus(); 779 779 780 G4LorentzVector p4j = theSystem->GetPartic 780 G4LorentzVector p4j = theSystem->GetParticipant( j )->Get4Momentum(); 781 G4double rmj = theSystem->GetParticipant( 781 G4double rmj = theSystem->GetParticipant( j )->GetMass(); 782 G4int zj = theSystem->GetParticipant( j )- 782 G4int zj = theSystem->GetParticipant( j )->GetChargeInUnitOfEplus(); 783 783 784 G4double pr = prcm; 784 G4double pr = prcm; 785 785 786 G4double c2 = pcm.z()/pr; 786 G4double c2 = pcm.z()/pr; 787 787 788 G4double csrt = srt - cutoff; 788 G4double csrt = srt - cutoff; 789 789 790 //G4double pri = prcm; 790 //G4double pri = prcm; 791 //G4double prf = sqrt ( 0.25 * srt*srt -rm2 791 //G4double prf = sqrt ( 0.25 * srt*srt -rm2 ); 792 792 793 G4double asrt = srt - rmi - rmj; 793 G4double asrt = srt - rmi - rmj; 794 G4double pra = prcm; 794 G4double pra = prcm; 795 795 796 796 797 797 798 G4double elastic = 0.0; 798 G4double elastic = 0.0; 799 799 800 if ( zi == zj ) 800 if ( zi == zj ) 801 { 801 { 802 if ( csrt < 0.4286 ) 802 if ( csrt < 0.4286 ) 803 { 803 { 804 elastic = 35.0 / ( 1. + csrt * 100.0 804 elastic = 35.0 / ( 1. + csrt * 100.0 ) + 20.0; 805 } 805 } 806 else 806 else 807 { 807 { 808 elastic = ( - std::atan( ( csrt - 0.4 808 elastic = ( - std::atan( ( csrt - 0.4286 ) * 1.5 - 0.8 ) 809 * 2. / pi + 1.0 ) * 9.65 + 809 * 2. / pi + 1.0 ) * 9.65 + 7.0; 810 } 810 } 811 } 811 } 812 else 812 else 813 { 813 { 814 if ( csrt < 0.4286 ) 814 if ( csrt < 0.4286 ) 815 { 815 { 816 elastic = 28.0 / ( 1. + csrt * 100.0 816 elastic = 28.0 / ( 1. + csrt * 100.0 ) + 27.0; 817 } 817 } 818 else 818 else 819 { 819 { 820 elastic = ( - std::atan( ( csrt - 0.4 820 elastic = ( - std::atan( ( csrt - 0.4286 ) * 1.5 - 0.8 ) 821 * 2. / pi + 1.0 ) * 12.34 + 821 * 2. / pi + 1.0 ) * 12.34 + 10.0; 822 } 822 } 823 } 823 } 824 824 825 // std::cout << "Collision csrt " << i << " 825 // std::cout << "Collision csrt " << i << " " << j << " " << csrt << std::endl; 826 // std::cout << "Collision elstic " << i << 826 // std::cout << "Collision elstic " << i << " " << j << " " << elastic << std::endl; 827 827 828 828 829 // std::cout << "Collision sig " << i << " " 829 // std::cout << "Collision sig " << i << " " << j << " " << sig << std::endl; 830 if ( G4UniformRand() > elastic / sig ) 830 if ( G4UniformRand() > elastic / sig ) 831 { 831 { 832 //std::cout << "Inelastic " << std::endl 832 //std::cout << "Inelastic " << std::endl; 833 //std::cout << "elastic/sig " << elastic 833 //std::cout << "elastic/sig " << elastic/sig << std::endl; 834 return result; 834 return result; 835 } 835 } 836 else 836 else 837 { 837 { 838 //std::cout << "Elastic " << std::endl; 838 //std::cout << "Elastic " << std::endl; 839 } 839 } 840 // std::cout << "Collision ELSTIC " << i << 840 // std::cout << "Collision ELSTIC " << i << " " << j << std::endl; 841 841 842 842 843 G4double as = G4Pow::GetInstance()->powN ( 843 G4double as = G4Pow::GetInstance()->powN ( 3.65 * asrt , 6 ); 844 G4double a = 6.0 * as / (1.0 + as); 844 G4double a = 6.0 * as / (1.0 + as); 845 G4double ta = -2.0 * pra*pra; 845 G4double ta = -2.0 * pra*pra; 846 G4double x = G4UniformRand(); 846 G4double x = G4UniformRand(); 847 G4double t1 = G4Log( (1-x) * G4Exp(2.*a*ta) 847 G4double t1 = G4Log( (1-x) * G4Exp(2.*a*ta) + x ) / a; 848 G4double c1 = 1.0 - t1/ta; 848 G4double c1 = 1.0 - t1/ta; 849 849 850 if( std::abs(c1) > 1.0 ) c1 = 2.0 * x - 1.0 850 if( std::abs(c1) > 1.0 ) c1 = 2.0 * x - 1.0; 851 851 852 /* 852 /* 853 G4cout << "Collision as " << i << " " << j 853 G4cout << "Collision as " << i << " " << j << " " << as << G4endl; 854 G4cout << "Collision a " << i << " " << j < 854 G4cout << "Collision a " << i << " " << j << " " << a << G4endl; 855 G4cout << "Collision ta " << i << " " << j 855 G4cout << "Collision ta " << i << " " << j << " " << ta << G4endl; 856 G4cout << "Collision x " << i << " " << j < 856 G4cout << "Collision x " << i << " " << j << " " << x << G4endl; 857 G4cout << "Collision t1 " << i << " " << j 857 G4cout << "Collision t1 " << i << " " << j << " " << t1 << G4endl; 858 G4cout << "Collision c1 " << i << " " << j 858 G4cout << "Collision c1 " << i << " " << j << " " << c1 << G4endl; 859 */ 859 */ 860 t1 = 2.0*pi*G4UniformRand(); 860 t1 = 2.0*pi*G4UniformRand(); 861 // std::cout << "Collision t1 " << i << " " 861 // std::cout << "Collision t1 " << i << " " << j << " " << t1 << std::endl; 862 G4double t2 = 0.0; 862 G4double t2 = 0.0; 863 if ( pcm.x() == 0.0 && pcm.y() == 0 ) 863 if ( pcm.x() == 0.0 && pcm.y() == 0 ) 864 { 864 { 865 t2 = 0.0; 865 t2 = 0.0; 866 } 866 } 867 else 867 else 868 { 868 { 869 t2 = std::atan2( pcm.y() , pcm.x() ); 869 t2 = std::atan2( pcm.y() , pcm.x() ); 870 } 870 } 871 // std::cout << "Collision t2 " << i << " 871 // std::cout << "Collision t2 " << i << " " << j << " " << t2 << std::endl; 872 872 873 G4double s1 = std::sqrt ( 1.0 - c1*c1 ); 873 G4double s1 = std::sqrt ( 1.0 - c1*c1 ); 874 G4double s2 = std::sqrt ( 1.0 - c2*c2 ); 874 G4double s2 = std::sqrt ( 1.0 - c2*c2 ); 875 875 876 G4double ct1 = std::cos(t1); 876 G4double ct1 = std::cos(t1); 877 G4double st1 = std::sin(t1); 877 G4double st1 = std::sin(t1); 878 878 879 G4double ct2 = std::cos(t2); 879 G4double ct2 = std::cos(t2); 880 G4double st2 = std::sin(t2); 880 G4double st2 = std::sin(t2); 881 881 882 G4double ss = c2*s1*ct1 + s2*c1; 882 G4double ss = c2*s1*ct1 + s2*c1; 883 883 884 pcm.setX( pr * ( ss*ct2 - s1*st1*st2) ); 884 pcm.setX( pr * ( ss*ct2 - s1*st1*st2) ); 885 pcm.setY( pr * ( ss*st2 + s1*st1*ct2) ); 885 pcm.setY( pr * ( ss*st2 + s1*st1*ct2) ); 886 pcm.setZ( pr * ( c1*c2 - s1*s2*ct1) ); 886 pcm.setZ( pr * ( c1*c2 - s1*s2*ct1) ); 887 887 888 // std::cout << "Collision pcm " << i << " " < 888 // std::cout << "Collision pcm " << i << " " << j << " " << pcm << std::endl; 889 889 890 G4double epot = theMeanField->GetTotalPoten 890 G4double epot = theMeanField->GetTotalPotential(); 891 891 892 G4double eini = epot + p4i.e() + p4j.e(); 892 G4double eini = epot + p4i.e() + p4j.e(); 893 G4double etwo = p4i.e() + p4j.e(); 893 G4double etwo = p4i.e() + p4j.e(); 894 894 895 /* 895 /* 896 G4cout << "Collision epot " << i << " " << 896 G4cout << "Collision epot " << i << " " << j << " " << epot << G4endl; 897 G4cout << "Collision eini " << i << " " << 897 G4cout << "Collision eini " << i << " " << j << " " << eini << G4endl; 898 G4cout << "Collision etwo " << i << " " << 898 G4cout << "Collision etwo " << i << " " << j << " " << etwo << G4endl; 899 */ 899 */ 900 900 901 901 902 for ( G4int itry = 0 ; itry < 4 ; itry++ ) 902 for ( G4int itry = 0 ; itry < 4 ; itry++ ) 903 { 903 { 904 904 905 G4double eicm = std::sqrt ( rmi*rmi + pc 905 G4double eicm = std::sqrt ( rmi*rmi + pcm*pcm ); 906 G4double pibeta = pcm*beta; 906 G4double pibeta = pcm*beta; 907 907 908 G4double trans = gamma * ( gamma * pibet 908 G4double trans = gamma * ( gamma * pibeta / ( gamma + 1 ) + eicm ); 909 909 910 G4ThreeVector pi_new = beta*trans + pcm; 910 G4ThreeVector pi_new = beta*trans + pcm; 911 911 912 G4double ejcm = std::sqrt ( rmj*rmj + pc 912 G4double ejcm = std::sqrt ( rmj*rmj + pcm*pcm ); 913 trans = gamma * ( gamma * pibeta / ( gam 913 trans = gamma * ( gamma * pibeta / ( gamma + 1 ) + ejcm ); 914 914 915 G4ThreeVector pj_new = beta*trans - pcm; 915 G4ThreeVector pj_new = beta*trans - pcm; 916 916 917 // 917 // 918 // Delete old 918 // Delete old 919 // Add new Particitipants 919 // Add new Particitipants 920 // 920 // 921 // Now only change momentum ( Beacuse we only 921 // Now only change momentum ( Beacuse we only have elastic sctter of nucleon 922 // In future Definition also will be change 922 // In future Definition also will be change 923 // 923 // 924 924 925 theSystem->GetParticipant( i )->SetMomen 925 theSystem->GetParticipant( i )->SetMomentum( pi_new ); 926 theSystem->GetParticipant( j )->SetMomen 926 theSystem->GetParticipant( j )->SetMomentum( pj_new ); 927 927 928 G4double pi_new_e = (theSystem->GetParti 928 G4double pi_new_e = (theSystem->GetParticipant( i )->Get4Momentum()).e(); 929 G4double pj_new_e = (theSystem->GetParti 929 G4double pj_new_e = (theSystem->GetParticipant( j )->Get4Momentum()).e(); 930 930 931 theMeanField->Cal2BodyQuantities( i ); 931 theMeanField->Cal2BodyQuantities( i ); 932 theMeanField->Cal2BodyQuantities( j ); 932 theMeanField->Cal2BodyQuantities( j ); 933 933 934 epot = theMeanField->GetTotalPotential() 934 epot = theMeanField->GetTotalPotential(); 935 935 936 G4double efin = epot + pi_new_e + pj_new 936 G4double efin = epot + pi_new_e + pj_new_e ; 937 937 938 //std::cout << "Collision NEW epot " << 938 //std::cout << "Collision NEW epot " << i << " " << j << " " << epot << " " << std::abs ( eini - efin ) - fepse << std::endl; 939 /* 939 /* 940 G4cout << "Collision efin " << i << " " 940 G4cout << "Collision efin " << i << " " << j << " " << efin << G4endl; 941 G4cout << "Collision " << i << " " << j 941 G4cout << "Collision " << i << " " << j << " " << std::abs ( eini - efin ) << " " << fepse << G4endl; 942 G4cout << "Collision " << std::abs ( ein 942 G4cout << "Collision " << std::abs ( eini - efin ) << " " << fepse << G4endl; 943 */ 943 */ 944 944 945 //071031 945 //071031 946 if ( std::abs ( eini - efin ) < fepse ) 946 if ( std::abs ( eini - efin ) < fepse ) 947 { 947 { 948 // Collison OK 948 // Collison OK 949 //std::cout << "collisions6" << std:: 949 //std::cout << "collisions6" << std::endl; 950 //std::cout << "collisions before " < 950 //std::cout << "collisions before " << p4i << " " << p4j << std::endl; 951 //std::cout << "collisions after " << 951 //std::cout << "collisions after " << theSystem->GetParticipant( i )->Get4Momentum() << " " << theSystem->GetParticipant( j )->Get4Momentum() << std::endl; 952 //std::cout << "collisions dif " << ( 952 //std::cout << "collisions dif " << ( p4i + p4j ) - ( theSystem->GetParticipant( i )->Get4Momentum() + theSystem->GetParticipant( j )->Get4Momentum() ) << std::endl; 953 //std::cout << "collisions before " < 953 //std::cout << "collisions before " << rix/fermi << " " << rjx/fermi << std::endl; 954 //std::cout << "collisions after " << 954 //std::cout << "collisions after " << theSystem->GetParticipant( i )->GetPosition() << " " << theSystem->GetParticipant( j )->GetPosition() << std::endl; 955 } 955 } 956 //071031 956 //071031 957 957 958 if ( std::abs ( eini - efin ) < fepse 958 if ( std::abs ( eini - efin ) < fepse ) return result; // Collison OK 959 959 960 G4double cona = ( eini - efin + etwo 960 G4double cona = ( eini - efin + etwo ) / gamma; 961 G4double fac2 = 1.0 / ( 4.0 * cona*co 961 G4double fac2 = 1.0 / ( 4.0 * cona*cona * pr*pr ) * 962 ( ( cona*cona - ( rmi*r 962 ( ( cona*cona - ( rmi*rmi + rmj*rmj ) )*( cona*cona - ( rmi*rmi + rmj*rmj ) ) 963 - 4.0 * rmi*rmi * rmj*r 963 - 4.0 * rmi*rmi * rmj*rmj ); 964 964 965 if ( fac2 > 0 ) 965 if ( fac2 > 0 ) 966 { 966 { 967 G4double fact = std::sqrt ( fac2 ) 967 G4double fact = std::sqrt ( fac2 ); 968 pcm = fact*pcm; 968 pcm = fact*pcm; 969 } 969 } 970 970 971 971 972 } 972 } 973 973 974 // Energetically forbidden collision 974 // Energetically forbidden collision 975 result = false; 975 result = false; 976 976 977 return result; 977 return result; 978 978 979 } 979 } 980 980