Fix errors in conversion of Nuclide methods

This commit is contained in:
Paul Romano 2018-12-21 08:22:50 -06:00
parent bc13a65711
commit 015360d477
10 changed files with 78 additions and 79 deletions

View file

@ -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;
};
//==============================================================================

View file

@ -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