Geant4 Cross Reference |
1 // 1 2 // ******************************************* 3 // * License and Disclaimer 4 // * 5 // * The Geant4 software is copyright of th 6 // * the Geant4 Collaboration. It is provided 7 // * conditions of the Geant4 Software License 8 // * LICENSE and available at http://cern.ch/ 9 // * include a list of copyright holders. 10 // * 11 // * Neither the authors of this software syst 12 // * institutes,nor the agencies providing fin 13 // * work make any representation or warran 14 // * regarding this software system or assum 15 // * use. Please see the license in the file 16 // * for the full disclaimer and the limitatio 17 // * 18 // * This code implementation is the result 19 // * technical work of the GEANT4 collaboratio 20 // * By using, copying, modifying or distri 21 // * any work based on the software) you ag 22 // * use in resulting scientific publicati 23 // * acceptance of all terms of the Geant4 Sof 24 // ******************************************* 25 // 26 // 27 // This software was developed by Lawrence Liv 28 // 29 // Redistribution and use in source and binary 30 // modification, are permitted provided that t 31 // 32 // 1. Redistributions of source code must reta 33 // this list of conditions and the following 34 // 2. Redistributions in binary form must repr 35 // this list of conditions and the following 36 // and/or other materials provided with the 37 // 3. The name of the author may not be used t 38 // derived from this software without specif 39 // 40 // THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``A 41 // WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 42 // MERCHANTABILITY AND FITNESS FOR A PARTICULA 43 // EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DI 44 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGE 45 // PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES 46 // OR BUSINESS INTERRUPTION) HOWEVER CAUSED AN 47 // WHETHER IN CONTRACT, STRICT LIABILITY, OR T 48 // OTHERWISE) ARISING IN ANY WAY OUT OF THE US 49 // ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 50 // 51 // Copyright (c) 2006 The Regents of the Unive 52 // All rights reserved. 53 // UCRL-CODE-224807 54 // 55 // 56 // 57 58 #include <cmath> 59 #include "G4fissionEvent.hh" 60 61 G4int G4fissionEvent::G4SmpNuDistDataPu239_241 62 63 /* 64 Description 65 Sample Number of Neutrons from fission in 66 Zucker and Holden's tabulated data for Pu- 67 The 11 P(nu) distributions are given as a 68 the average number of neutrons from induce 69 11 different energies (0 to 10 MeV), based 70 from Zucker and Holden. 71 */ 72 73 /* 74 Input 75 nubar - average number of neutrons per 76 Output 77 G4SmpNuDistDataPu239_241_MC - sampled mul 78 79 */ 80 81 static G4double Pu239nu [11] [9] = { 82 {.0108826, .0994916, .2748898, .3269196, 83 {.0084842, .0790030, .2536175, .3289870, 84 {.0062555, .0611921, .2265608, .3260637, 85 {.0045860, .0477879, .1983002, .3184667, 86 {.0032908, .0374390, .1704196, .3071862, 87 {.0022750, .0291416, .1437645, .2928006, 88 {.0014893, .0222369, .1190439, .2756297, 89 {.0009061, .0163528, .0968110, .2558524, 90 {.0004647, .0113283, .0775201, .2335926, 91 {.0002800, .0071460, .0615577, .2089810, 92 {.0002064, .0038856, .0492548, .1822078, 93 }; 94 static G4double Pu239nubar [11] = { 95 2.8760000, 96 3.0088800, 97 3.1628300, 98 3.3167800, 99 3.4707300, 100 3.6246800, 101 3.7786300, 102 3.9325800, 103 4.0865300, 104 4.2404900, 105 4.3944400 106 }; 107 G4double fraction, r, cum; 108 G4int engind, nu; 109 110 /* 111 Check if nubar is within the range of experi 112 */ 113 if(nubar >= Pu239nubar[0] && nubar <= Pu239n 114 /* 115 Use Zucker and Holden Data 116 */ 117 engind = 1; 118 while (nubar > Pu239nubar[engind]){ engin 119 // Loop checking, 11.03.2015, T. Koi 120 fraction = (nubar-Pu239nubar[engind-1])/( 121 if(fisslibrng() > fraction) engind--; 122 123 r = fisslibrng(); 124 nu = 0; 125 cum = Pu239nu[engind][0]; 126 while (r > cum && nu < 8){ 127 // Loop checking, 11.03.2015, T. Koi 128 nu++; 129 cum += Pu239nu[engind][nu]; 130 } 131 return nu; 132 } else { 133 /* 134 Use Terrell's formula 135 */ 136 return (G4int) G4SmpTerrell(nubar); 137 } 138 } 139