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

Fixed derived type for StructuredMesh (had int4s instead of real8s for origin and width).

Browse source
This commit is contained in:
Paul Romano 2011-11-21 10:41:34 -05:00
parent 0bbf63e0a8
commit 03f00a2259
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/mesh_header.f90
View file

@ -12,8 +12,8 @@ module mesh_header
integer :: type
integer :: n_dimension
integer, allocatable :: dimension(:)
integer, allocatable :: origin(:)
integer, allocatable :: width(:)
real(8), allocatable :: origin(:)
real(8), allocatable :: width(:)
end type StructuredMesh
end module mesh_header