Complete shape definitions
Type  Visibility  Attributes  Name  Initial  

character(len=labelLen),  public  ::  kind  a kind of the shape defined. 

integer,  public  ::  shapeID  =  0  a identification for the shape 

type(tem_canonicalND_type),  public,  allocatable  ::  canoND(:)  canonical definition 

type(tem_triangle_type),  public,  allocatable  ::  triangle(:)  triangle definition 

type(tem_stlData_type),  public  ::  stl_data  STL definition 

type(tem_sphere_type),  public,  allocatable  ::  sphere(:)  spheres definition 

type(tem_ellipsoid_type),  public,  allocatable  ::  ellipsoid(:)  ellipsoid definition 

type(tem_cylinder_type),  public,  allocatable  ::  cylinder(:)  cylinder definition 

integer(kind=long_k),  public  ::  propBits  =  0_long_k  property bits 

character(len=labelLen),  public,  allocatable  ::  bcLabels(:)  boundary labels, used to identify elements belong to these boundaries It is allocated and set in routine: tem_shape_load_bcLabels 

integer,  public  ::  minLevel  =  1  level range for level shape type 

integer,  public  ::  maxLevel  =  globalMaxLevels  
logical,  public  ::  inverted  =  .false.  If true then subTree is created for inverted shape i.e nonintersected 
type tem_shape_type
!> a kind of the shape defined.
character(len=labelLen) :: kind
!> a identification for the shape
integer :: shapeID = 0
!> canonical definition
type(tem_canonicalND_type), allocatable :: canoND(:)
!> triangle definition
type(tem_triangle_type), allocatable :: triangle(:)
!> STL definition
type(tem_stlData_type) :: stl_data
!> spheres definition
type(tem_sphere_type), allocatable :: sphere(:)
!> ellipsoid definition
type(tem_ellipsoid_type), allocatable :: ellipsoid(:)
!> cylinder definition
type(tem_cylinder_type), allocatable :: cylinder(:)
!> property bits
integer(kind=long_k) :: propBits = 0_long_k
!> boundary labels, used to identify elements belong to these boundaries
!! It is allocated and set in routine: tem_shape_load_bcLabels
character(len=labelLen), allocatable :: bcLabels(:)
!> level range for level shape type
integer :: minLevel = 1
integer :: maxLevel = globalMaxLevels
!> If true then subTree is created for inverted shape i.e nonintersected
logical :: inverted = .false.
end type tem_shape_type