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

Change array to read rotation angles to real(8)

Browse source
This commit is contained in:
Paul Romano 2015-03-11 08:46:53 -04:00
parent 2bfd9ed051
commit 49ec9136a7
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/input_xml.F90
View file

@ -904,8 +904,8 @@ contains
integer :: universe_num
integer :: n_cells_in_univ
integer :: coeffs_reqd
integer :: temp_double_array3(3)
integer, allocatable :: temp_int_array(:)
real(8) :: temp_double_array3(3)
real(8) :: phi, theta, psi
logical :: file_exists
logical :: boundary_exists