Geant4 Cross Reference |
1 // 2 // ******************************************************************** 3 // * License and Disclaimer * 4 // * * 5 // * The Geant4 software is copyright of the Copyright Holders of * 6 // * the Geant4 Collaboration. It is provided under the terms and * 7 // * conditions of the Geant4 Software License, included in the file * 8 // * LICENSE and available at http://cern.ch/geant4/license . These * 9 // * include a list of copyright holders. * 10 // * * 11 // * Neither the authors of this software system, nor their employing * 12 // * institutes,nor the agencies providing financial support for this * 13 // * work make any representation or warranty, express or implied, * 14 // * regarding this software system or assume any liability for its * 15 // * use. Please see the license in the file LICENSE and URL above * 16 // * for the full disclaimer and the limitation of liability. * 17 // * * 18 // * This code implementation is the result of the scientific and * 19 // * technical work of the GEANT4 collaboration. * 20 // * By using, copying, modifying or distributing the software (or * 21 // * any work based on the software) you agree to acknowledge its * 22 // * use in resulting scientific publications, and indicate your * 23 // * acceptance of all terms of the Geant4 Software license. * 24 // ******************************************************************** 25 // 26 // 27 // by V. Lara 28 // 29 // Modified: 30 // 23.08.2010 V.Ivanchenko general cleanup, move constructor and destructor 31 // the source, use G4Pow 32 33 #include "G4HETCDeuteron.hh" 34 #include "G4Deuteron.hh" 35 #include "G4CoulombBarrier.hh" 36 37 G4HETCDeuteron::G4HETCDeuteron() 38 : G4HETCChargedFragment(G4Deuteron::Deuteron(), new G4CoulombBarrier(2, 1)) 39 {} 40 41 G4double G4HETCDeuteron::GetAlpha() const 42 { 43 G4double C = 0.0; 44 if (theFragZ <= 70) 45 { 46 C = 0.10; 47 } 48 else 49 { 50 C = ((((0.15417e-06*theFragZ) - 0.29875e-04)*theFragZ 51 + 0.21071e-02)*theFragZ - 0.66612e-01)*theFragZ + 0.98375; 52 } 53 return 1.0 + C*0.5; 54 } 55 56 G4double G4HETCDeuteron::GetSpinFactor() const 57 { 58 // 2s+1 59 return 3.0; 60 } 61 62 G4double G4HETCDeuteron::K(const G4Fragment& aFragment) const 63 { 64 // Number of protons in emitted fragment 65 G4int Pa = theZ; 66 // Number of neutrons in emitted fragment 67 G4int Na = theA - Pa; 68 69 G4double r = (G4double)theResZ/(G4double)theResA; 70 71 G4int P = aFragment.GetNumberOfParticles(); 72 G4int H = aFragment.GetNumberOfHoles(); 73 74 G4double result = (P > 1) ? 75 2.*(H*(H-1.0)*r*(r-1.0)+H*(Na*r+Pa*(1.0-r)) + Pa*Na) 76 /(P*(P-1.0)*r*(1.0 - r)) : 0.0; 77 78 return std::max(0.0,result); 79 } 80