crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 06:05:58 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Merge pull request #1071 from jtramm/32bit_fix

Browse source 
Resolves issue #1070
This commit is contained in:
Paul Romano 2018-09-13 20:15:18 -05:00 • committed by GitHub
commit be49834727
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
2 changed files with 3 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/hdf5_interface.cpp
View file

@ -748,6 +748,8 @@ const hid_t H5TypeMap<int>::type_id = H5T_NATIVE_INT;
template<>
const hid_t H5TypeMap<unsigned long>::type_id = H5T_NATIVE_ULONG;
template<>
const hid_t H5TypeMap<unsigned int>::type_id = H5T_NATIVE_UINT;
template<>
const hid_t H5TypeMap<int64_t>::type_id = H5T_NATIVE_INT64;
template<>
const hid_t H5TypeMap<double>::type_id = H5T_NATIVE_DOUBLE;

2
src/nuclide_header.F90
View file

@ -122,7 +122,7 @@ module nuclide_header
! Arbitrary value to indicate invalid cache state for elastic scattering
! (NuclideMicroXS % elastic)
real(8), parameter :: CACHE_INVALID = dble(Z"FFE0000000000000")
real(8), parameter :: CACHE_INVALID = -1
type, bind(C) :: NuclideMicroXS
! Microscopic cross sections in barns