mirror of
https://github.com/openmc-dev/openmc.git
synced 2026-07-29 06:35:48 -04:00
Fix errors in conversion of Nuclide methods
This commit is contained in:
parent
bc13a65711
commit
015360d477
10 changed files with 78 additions and 79 deletions
|
|
@ -98,10 +98,7 @@ public:
|
|||
Nuclide(hid_t group, const double* temperature, int n, int i_nuclide);
|
||||
|
||||
//! Initialize logarithmic grid for energy searches
|
||||
//! \param E_min Minimum energy in [eV]
|
||||
//! \param E_max Maximum energy in [eV]
|
||||
//! \param M Number of equally log-spaced bins
|
||||
void init_grid(double E_min, double E_max, int M);
|
||||
void init_grid();
|
||||
|
||||
void calculate_xs(int i_sab, double E, int i_log_union,
|
||||
double sqrtkT, double sab_frac);
|
||||
|
|
@ -160,11 +157,11 @@ public:
|
|||
private:
|
||||
void create_derived();
|
||||
|
||||
static constexpr int XS_TOTAL {0};
|
||||
static constexpr int XS_ABSORPTION {1};
|
||||
static constexpr int XS_FISSION {2};
|
||||
static constexpr int XS_NU_FISSION {3};
|
||||
static constexpr int XS_PHOTON_PROD {4};
|
||||
static int XS_TOTAL;
|
||||
static int XS_ABSORPTION;
|
||||
static int XS_FISSION;
|
||||
static int XS_NU_FISSION;
|
||||
static int XS_PHOTON_PROD;
|
||||
};
|
||||
|
||||
//==============================================================================
|
||||
|
|
|
|||
|
|
@ -137,18 +137,6 @@ public:
|
|||
std::vector<ThermalData> data_;
|
||||
};
|
||||
|
||||
//==============================================================================
|
||||
// Fortran compatibility functions
|
||||
//==============================================================================
|
||||
|
||||
extern "C" {
|
||||
ThermalScattering* sab_from_hdf5(hid_t group, const double* temperature,
|
||||
int n, int method, double tolerance, const double* minmax);
|
||||
void sab_free(ThermalScattering* data);
|
||||
bool sab_has_nuclide(ThermalScattering* data, const char* name);
|
||||
double sab_threshold(ThermalScattering* data);
|
||||
}
|
||||
|
||||
} // namespace openmc
|
||||
|
||||
#endif // OPENMC_THERMAL_H
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue