crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-26 13:15:39 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Change indexing for prn sampling for URR ptables

Browse source
This commit is contained in:
Paul Romano 2021-03-24 07:56:01 -05:00
parent de2cbe0c1e
commit f8241f567f
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/nuclide.cpp
View file

@ -808,9 +808,7 @@ void Nuclide::calculate_urr_xs(int i_temp, Particle& p) const
// reuse random numbers for the same nuclide at different temperatures,
// therefore preserving correlation of temperature in probability tables.
p.stream_ = STREAM_URR_PTABLE;
//TODO: to maintain the same random number stream as the Fortran code this
//replaces, the seed is set with index_ + 1 instead of index_
double r = future_prn(static_cast<int64_t>(index_ + 1), *p.current_seed());
double r = future_prn(static_cast<int64_t>(index_), *p.current_seed());
p.stream_ = STREAM_TRACKING;
int i_low = 0;