!--------------------------------------------------------------------------------------------------
!> @author Philip Eisenlohr, Max-Planck-Institut für Eisenforschung GmbH
!> @author Christoph Koords, Max-Planck-Institut für Eisenforschung GmbH
!> @author Martin Diehl, Max-Planck-Institut für Eisenforschung GmbH
!> @brief Geometric information about the IP cells needed for the nonlocal
! plasticity model
!--------------------------------------------------------------------------------------------------
module geometry_plastic_nonlocal
  use prec

  implicit none
  private
  logical,    dimension(3),                    public, parameter :: &
    geometry_plastic_nonlocal_periodicSurface = .true.                                              !< flag indicating periodic outer surfaces (used for fluxes) NEEDED?

  integer,    dimension(:,:,:,:), allocatable, public, protected :: &
    geometry_plastic_nonlocal_IPneighborhood                                                        !< 6 or less neighboring IPs as [element_num, IP_index, neighbor_index that points to me]

  real(pReal), dimension(:,:),    allocatable, public, protected :: &
    geometry_plastic_nonlocal_IPvolume                                                              !< volume associated with IP (initially!)
 
  real(pReal), dimension(:,:,:),  allocatable, public, protected :: &
    geometry_plastic_nonlocal_IParea                                                                !< area of interface to neighboring IP (initially!)

  real(pReal),dimension(:,:,:,:), allocatable, public, protected :: &
    geometry_plastic_nonlocal_IPareaNormal                                                          !< area normal of interface to neighboring IP (initially!)

end module geometry_plastic_nonlocal