Removed some unused attributes for geometry types and Material.

This commit is contained in:
Paul Romano 2011-11-02 16:11:00 -04:00
parent de522016f7
commit a6499c4f56
2 changed files with 0 additions and 4 deletions

View file

@ -15,7 +15,6 @@ module geometry_header
real(8) :: x0 ! Translation in x-coordinate
real(8) :: y0 ! Translation in y-coordinate
real(8) :: z0 ! Translation in z-coordinate
integer, allocatable :: tallies(:)
end type Universe
!===============================================================================
@ -34,7 +33,6 @@ module geometry_header
real(8) :: width_x ! width of lattice cell
real(8) :: width_y ! width of lattice cell
integer, allocatable :: element(:,:) ! specified universes
integer, allocatable :: tallies(:)
end type Lattice
!===============================================================================
@ -68,7 +66,6 @@ module geometry_header
& surfaces(:) ! List of surfaces bounding cell -- note that
! parentheses, union, etc operators will be listed
! here too
integer, allocatable :: tallies(:)
end type Cell
! array index of universe 0

View file

@ -15,7 +15,6 @@ module material_header
real(8) :: density ! total atom density in atom/b-cm
real(8), allocatable :: atom_density(:) ! nuclide atom density in atom/b-cm
real(8), allocatable :: atom_percent(:) ! atom/weight percent (negative for weight)
real(8), allocatable :: total_xs(:) ! macroscopic cross-section
! S(a,b) data references
logical :: has_sab_table = .false.