Object_type Derived Type

type, public :: Object_type


Components

Type Visibility Attributes Name Initial
class(Object_type), public, pointer :: next => null()
class(Object_type), public, pointer :: prev => null()
type(point_type), public, dimension(:), allocatable :: vertices
real(kind=rp), public, dimension(NDIM) :: normal
real(kind=rp), public, dimension(NDIM) :: tangent
real(kind=rp), public, dimension(NDIM) :: coords
integer, public :: index
integer, public :: NumOfVertices
integer, public, dimension(2) :: partition

Type-Bound Procedures

procedure, public :: copy => object_type_copy

procedure, public :: build => object_type_build

  • public subroutine object_type_build(this, Points, normal, NumOfVertices, index)

    Arguments

    Type IntentOptional Attributes Name
    class(Object_type), intent(inout) :: this
    real(kind=RP), intent(in) :: Points(:,:)
    real(kind=RP), intent(in) :: normal(:)
    integer, intent(in) :: NumOfVertices
    integer, intent(in) :: index

procedure, public :: destruct => object_type_destruct