Remove tally_filter_mesh -> global dependence

This commit is contained in:
Paul Romano 2017-08-09 12:14:56 -05:00
parent 8d27000043
commit 6e82c34a58
3 changed files with 5 additions and 3 deletions

View file

@ -12,7 +12,6 @@ module global
use dict_header, only: DictCharInt, DictIntInt
use geometry_header, only: Cell, Universe, Lattice, LatticeContainer
use material_header, only: Material
use mesh_header, only: RegularMesh
use mgxs_header, only: Mgxs, MgxsContainer
use plot_header, only: ObjectPlot
use set_header, only: SetInt
@ -29,6 +28,9 @@ module global
use nuclide_header
use sab_header
! Inherit meshes array
use mesh_header
implicit none
! ============================================================================
@ -125,7 +127,6 @@ module global
! ============================================================================
! TALLY-RELATED VARIABLES
type(RegularMesh), allocatable, target :: meshes(:)
type(TallyObject), allocatable, target :: tallies(:)
type(TallyFilterContainer), allocatable, target :: filters(:)
type(TallyFilterMatch), allocatable :: filter_matches(:)

View file

@ -26,6 +26,8 @@ module mesh_header
procedure :: intersects => regular_intersects
end type RegularMesh
type(RegularMesh), allocatable, target :: meshes(:)
contains
!===============================================================================

View file

@ -5,7 +5,6 @@ module tally_filter_mesh
use constants
use error, only: warning
use mesh_header
use global, only: meshes
use hdf5_interface
use particle_header, only: Particle
use string, only: to_str