PetiClass Module



Interfaces

public interface operator(//)

  • public function append_peti_object_vector(arg1, arg2) result(ret)

    Arguments

    Type IntentOptional Attributes Name
    type(Peti_), intent(in), allocatable :: arg1(:)
    type(Peti_), intent(in), allocatable :: arg2(:)

    Return Value type(Peti_), allocatable, (:)


Derived Types

type, public ::  Peti_

Components

Type Visibility Attributes Name Initial
type(FEMDomain_), public :: FEMDomain
real(kind=real64), public :: Thickness
real(kind=real64), public :: length
real(kind=real64), public :: width
real(kind=real64), public :: MaxThickness
real(kind=real64), public :: Maxlength
real(kind=real64), public :: Maxwidth
real(kind=real64), public :: center_bottom(3)
real(kind=real64), public :: center_top(3)
real(kind=real64), public :: radius_bottom(3)
real(kind=real64), public :: radius_top(3)
real(kind=real64), public :: outer_normal_bottom(3)
real(kind=real64), public :: outer_normal_top(3)
integer(kind=int32), public :: Division
type(Stem_), public, pointer :: pStem

Type-Bound Procedures

procedure, public :: Init => initPeti
procedure, public :: export => exportPeti

Functions

public function append_peti_object_vector(arg1, arg2) result(ret)

Arguments

Type IntentOptional Attributes Name
type(Peti_), intent(in), allocatable :: arg1(:)
type(Peti_), intent(in), allocatable :: arg2(:)

Return Value type(Peti_), allocatable, (:)


Subroutines

public subroutine initPeti(obj, Thickness, length, width, MaxThickness, Maxlength, Maxwidth, rotx, roty, rotz, location)

Arguments

Type IntentOptional Attributes Name
class(Peti_), intent(inout) :: obj
real(kind=real64), intent(in), optional :: Thickness
real(kind=real64), intent(in), optional :: length
real(kind=real64), intent(in), optional :: width
real(kind=real64), intent(in), optional :: MaxThickness
real(kind=real64), intent(in), optional :: Maxlength
real(kind=real64), intent(in), optional :: Maxwidth
real(kind=real64), intent(in), optional :: rotx
real(kind=real64), intent(in), optional :: roty
real(kind=real64), intent(in), optional :: rotz
real(kind=real64), intent(in), optional :: location(3)

public subroutine exportPeti(obj, FileName, PetiID)

Arguments

Type IntentOptional Attributes Name
class(Peti_), intent(in) :: obj
character(len=*), intent(in) :: FileName
integer(kind=int32), intent(inout), optional :: PetiID