Declare block bounds as real, not double precision values.
This commit is contained in:
parent
f9f6984988
commit
f613d52ff3
@ -118,7 +118,7 @@ module blocks
|
|||||||
|
|
||||||
! the block coordinates in the physical units
|
! the block coordinates in the physical units
|
||||||
!
|
!
|
||||||
real(kind=8) :: xmin, xmax, ymin, ymax, zmin, zmax
|
real :: xmin, xmax, ymin, ymax, zmin, zmax
|
||||||
|
|
||||||
end type block_meta
|
end type block_meta
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user